¡Incrédulos!, claro que sucederá algo parecido a "eso", la NASA lo ha confirmado. Aquí una imagen que mejor explica lo que sucederá:

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úDim memBa As MEMORY_BASIC_INFORMATION
Dim sysInfo As SYSTEM_INFO
...
Call VirtualQueryEx(hpid, sysInfo.lpMinimumApplicationAddress, memBa, 28)
msgbox memBa.BaseAddress
CitarCall BringWindowToTop(vHWND)
Citarno, porque usas un Tipo de estructura? cuando deben estar los 2 en un long? x'D
4 bytes (long) = 2 bytes (Integer) KeyCode + 2 bytes (Integer) Modificadores (Control / ALt / Shift)
Citar
CtrlL.hKey = vbKeyA '&H4C
CtrlL.lKey = MOD_CONTROL '&H2
Call CopyMemory(tHotK2, ByVal VarPtr(CtrlL), 8)