Puoi provare ad usare l'evento KeyUp, KeyDown o KeyPress del form
anche se dubito che funzioni
oppure
usare l'API GetAsyncKeyState
Declare Function GetAsyncKeyState Lib “user32″ (ByVal vKey As Long) As Integer
Se per esempio vuoi controllare CTRL + A puoi fare
If GetAsyncKeyState(vbKeyCTRL) And GetAsyncKeyState(vbKeyA) Then
Form1.Show
End If
Tutto questo codice lo puoi inserire in un timer
NB: Non sono sicuro che vbKeyCTRL sia quello giusto, altrimenti prova con altri codici