Problema con SetWindowsHookEx

Hola grupo,

Estoy desarrollando una aplicación con VB6 en un Win2000 Pro. Cuando instalo
y ejecuto esta aplicación en un Win 98 tengo el siguiente problema:

En la aplicación utilizo el siguiente fragmento de código para cambiar el
texto del botón de un MsgBox:

Dim hInst As Long
Dim Thread As Long

' Crear el hook para subclasificar el MsgBox
hInst = GetWindowLong(Me.hWnd, GWL_HINSTANCE)
Thread = GetCurrentThreadId()
hHook = SetWindowsHookEx(WH_CALLWNDPROCRET, AddressOf CallWndRetProc,
hInst, Thread)

Pues bien, la última instrucción de este fragmento (la que contiene la
llamada a SetWindowsHookEx) genera una operación no válida y el programa se
cierra. Esto no me ocurre en el equipo con Win2000 Pro en el que he
desarrollado la aplicación. ¿Cómo puedo solucionarlo? ¿Es algun problema de
versiones de alguna dll?

Muchas gracias de antemano.