Imagebase o BaseAddress de un proceso[HELP]

[ignorantev1.1]

Buenas, estoy recorre y recorre la web, buscando alguna forma de saber la imagebase o baseAddress de un proceso, mediante algún API...

estuve tratando con "VirtualQueryEx":

Código (vb) [Seleccionar] Expandir

Dim memBa As MEMORY_BASIC_INFORMATION
Dim sysInfo As SYSTEM_INFO
...
    Call VirtualQueryEx(hpid, sysInfo.lpMinimumApplicationAddress, memBa, 28)
    msgbox memBa.BaseAddress


Pero no me sale.

¿Es esto posible con "VirtualQueryEx" o necesito de otro método?

La verdad tengo ya tiempo buscando y no encuentro nada 

Saludos y gracias!