Entry point

#include <iostream>

using namespace std;

#include <windows.h>

typedef void (*VF)();

int main()
{
    HINSTANCE glue = LoadLibrary("driver.dll");
    VF f = (VF)GetProcAddress(glue, "f");
    cout << "test main says hi from C++" << endl;
    f();
    return 0;
}

#include <iostream>

using namespace std;

#include <windows.h>

typedef void (*VF)();

static VF realf;

extern "C"
{
BOOL APIENTRY DllMain( HANDLE hModule, DWORD  ul_reason_for_call, LPVOID lpReserved);
__declspec(dllexport) void f();
}

BOOL APIENTRY DllMain( HANDLE hModule, DWORD  ul_reason_for_call, LPVOID lpReserved)
{
    if(ul_reason_for_call == DLL_PROCESS_ATTACH)
    {
        cout << "driver DlLMain says hi from C++" << endl;
        HINSTANCE glue = LoadLibrary("glue.dll");
        realf = (VF)GetProcAddress(glue, "f");
    }
    return TRUE;
}

__declspec(dllexport) void f()
{
    cout << "driver f says hi from C++" << endl;
    realf();
}

#include <iostream>

using namespace std;

#include <windows.h>

#using <mscorlib.dll>

#using <demo.dll>

using namespace E;

extern "C"
{
__declspec(dllexport) void f();
}

__declspec(dllexport) void f()
{
    cout << "glue f says hi from C++" << endl;
    Demo^ o = gcnew Demo();
    o->F();
}

Imports System

Namespace E
    Public Class Demo
        Public Sub F()
            Console.WriteLine("Demo.F says hi from VB.NET")
        End Sub
    End Class
End Namespace

vbc /t:library demo.vb
cl /LD /CLR glue.cpp
cl /EHsc /LD driver.cpp
cl /EHsc test.cpp