[VB6] Eseguire delle righe di codice alla pressione di un tasto

[trusthat]

Ciao ragazzi, ho un problema.
Vorrei eliminare alcuni button dal mio programma e sostituirli con la pressione di determinati tasti.
Es.
Invece del comando CHIUDI voglio che premendo esc la finestra si chiuda.
Grazie mille

[Giulio C.]

Ciao.

Io per le mie applicazioni sfrutto questo codice:

Private Sub Form_KeyPress(KeyAscii As Integer)     ' Spostamento tra un campo e l'altro mediante il tasto
    If KeyAscii = 13 Then   ' "Enter" - Nota: la proprietà KeyPreview del form è True
       SendKeys "{TAB}"
       KeyAscii = 0
    End If
    If KeyAscii = 27 Then cmdChiudi.Value = True   ' Chiusura mediante il tasto "ESC"
End Sub

Tu puoi fare altrettando non considerando se "KeyAscii = 13" e sostituendo il mio comando "cmdChiudi" con Unload.


Ricordati inoltre di attivare a True la proprietà "KeyPreview" del tuo form.

Fammi sapere.