buscate el msdn de vb6 ó del VS6, ahi tenes cosas de sobra.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Declare Function GetForegroundWindow Lib "user32" () As Long