VB6 e intercettazione pressione dei tasti funzione

[Dylan666]

Sto facendo una piccola applicazione in VB6, ho trovato il codice per mandare la finestra nella traybar ma adesso mi interesserebbe intercettare la pressione del tasto F4 per ri-mostrare la form. Come si fa?
Siate chiari perché non sono molto pratico in materia, infatti ho cercato su Google ma non ho risolto

[Dylan666]

Pare sia un problema di focus, dato che se metto il seguente codice in una form vuota funziona, se invece aggiungo una textbox il cursore lampeggia lì dentro e l'evento non viene catturato.

Codice: Seleziona tutto

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
    Case vbKeyLeft
        MsgBox "Pressed the LEFT key"
    Case vbKeyRight
        MsgBox "Pressed the RIGHT key"
    Case vbKeyUp
        MsgBox "Pressed the UP key"
    Case vbKeyDown
        MsgBox "Pressed the DOWN key"
    Case Else
        MsgBox "Pressed key, code = " & KeyCode
    End Select
End Sub

Che faccio?