VB: Routinen-Abbruch mit ESC

Hallo,

irgendwann hat schon mal jemand geschrieben, wie das geht, aber ich hab’s im We-We-We-Archiv nicht wiedergefunden.

Also:
Wie kann man das „ESC-Drück-Ereignis“ abfangen und auswerten?

Danke!

Kristian

Hi!

Probier mal folgendes:

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
KeyAscii = 0 'Zurück setzen des Tastaturpuffers
MsgBox „Der Benutzer hat die ESC-Taste gedrückt!“
End If
End Sub

Grüße
Patrick

http://www.pati.purespace.de

Bei Patricks Code ist wichtig, dass die KeyPreview-Eigenschaft des Formulars gesetzt ist.

Eine Alternative wäre eine Schaltfläche mit gesetzter Cancel-Eigenschaft …

Reinhard