Come assegnare azioni ai tasti?
1 - Creare un modulo d'ordine nella struttura e l'evento 'Cliccando' sulle proprietà del modulo immettere il seguente: me.keypreview = true
Oppure è questo andare a fare gli eventi della tastiera vengono ricevuti nella prima forma.
2 - Nelle proprietà del modulo, 'bottone qui sotto per' l'evento inserire il seguente codice:
Privato Form_KeyDown Sub (KeyCode As Integer, Shift As Integer)
Seleziona KeyCode Caso
Caso vbKeyF2
DoCmd.OpenForm "Form1"
Caso vbKeyF3
DoCmd.OpenForm "Form2"
Caso vbKeyF4
DoCmd.OpenForm "formulario3"
Caso vbKeyF5
As Double Dim Calculator
Calcolatrice = Shell ("calc.exe", vbNormalFocus)
Caso vbKeyF6
DoCmd.Close
Case Else
End Select
End Sub
Quello che fa è la seguente:
- Premendo il tasto F2 apre la form1
- Premendo il tasto F3 si apre Form2
- Premendo il tasto F4 apre la formulário3
- Premendo il tasto F5 si apre la calcolatrice di Windows
- Premendo il tasto F6 chiude la maschera
Oltre al tasto funzione F1, F2 ... ecc, possiamo anche usare qualsiasi altro tasto per eseguire le funzioni, ma tenendo presente che se vogliamo inserire dati in una forma non adatti utilizzare i tasti che vengono utilizzati per scrivere i dati nei campi.
Un'altra cosa è che funziona solo sul modulo dove si mettono i codici di cui sopra.
Download: Keys 






























Wow, quindi questo esempio non lo fa?! È possibile effettuare uno e mi mandi via e-mail?!?! Grazie mille! Ate!