_Multithreading and Visual Basic_ 
by Dino Esposito

Example 1:

pfn = GetProcAddress( m_hModule, m_function );
m_hThread = CreateThread( NULL, 0, (LPTHREAD_START_ROUTINE)pfn, (LPVOID)m_params, 0, &dwThreadId );


Example 2:

hInst = GetWindowLong(hWnd, GWL_HINSTANCE)
hwndAni = CreateWindowEx(0, "SysAnimate32", "", ACS_TRANSPARENT Or WS_CHILD Or WS_VISIBLE, 0, 0, 0, 0, hWnd, 1, hInst, vbNull)


Example 3:

Thread1.Library = "thelib.dll"
Thread1.Function = "Go"
Thread1.Params = hwndAni
hThread = Thread1.Create