GetAsyncKeyState API is the answer (sorry for being away)
Code:
'In declarations
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Sub Form_Load()
'For instance having ESC to end your app:
If GetAsyncKeyState(vbKeyEscape) Then Unload me