KeyDown in un form

[morbibi]

Ho questo codice che funziona perfettamente:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

Quindi quando io premo un tasto nella Text1 parte questa sub...Ma se io volessi che quando premo un tasto nella form, anche se non sono nella txt partisse la sub come dovrei fare?

Ho provato così (il nome del mio form è Form1):

Private Sub Form1_KeyDown(KeyCode As Integer, Shift As Integer)
------------------------------------------------------------

Ma non va

 

[PoLe]

Pronti con la soluzione!!

Eh eh, sarebbe bello fosse così facile!!!

:book: Eccoti la soluzione:
=========================================
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
----------------------------------------------------
Private Sub Form_KeyDown(tasto As Integer, Shift As Integer)
If tasto = vbKeyR Then MsgBox "Funziona!"
End Sub
=========================================

In questo caso ti ho messo R se vuoi che l'evento si scateni alla pressione del tasto R.
Se vuoi che il tutto accada alla pressione del tasto E basta che nel codice sostituisci E a R, e così via oppure
se vuoi che il tutto accada alla pressione del tasto F5 basta che nel codice sostituisci F5 a R, e così via.

Se hai qualche dubbio, o se vuoi che ti spiego i passaggi, sono qui!

Salut!
:byebye:

 

[little91]

:s

MhMhMmMmmm gira che ti rigira senza volerlo trovo i messaggi dei miei ex compagni di classe O_O
Cooooomunque volevo sapere se era possibile fare la stessa cosa anche con combinazioni di tasti
e.. Coooomunque² credo che sia il mio primo post ^^ ciau a todoss