Visual Basic - Sobre getModuleFileName

hola a todos

nesecito saber como usar la función getModuleFileName de las API ya que no me funciona como yo quiero porfavor vean en que me equivoco :)

'--------------------------------------------------------------------------------------------------------------------------
1: Utilizo getForegroundWindow para obtener el hWnd

hWnd = getForegroundWindow

2: Utilizo GetWindowLong(hWnd, GWL_HINSTANCE) para obtener el hInstance

hInstance = GetWindowLong(hWnd, GWL_HINSTANCE)

3: utilizo de esta forma el getModuleFileName para obtener la ruta (guardando la longitud)
y declarando con 256 caracteres la variable strFileName

Dim strFileName As String * 256
lenStr = GetModuleFileName(hInstance, strFileName, 260)

4: El resultado

Msgbox left(strFileName,lenStr)

'--------------------------------------------------------------------------------------------------------------------------

Bueno esta secuencia funciona con el escritorio por ejemplo, ahi me devuelve ke Shell32.dll es el archivo del procesos que crea esa ventana pero en algunas no funciona el GetModuleFileName por no decir la mayoría =S ¿Porque?

Gracias de antemano
Salu2
Virtuajats