ESC-Taste unterdrücken

[SG05]

Hallo Zusammen,

ich möchte, dass in einem Formular das drücken der ESC-Taste keine Reaktion auslöst.

Vieleicht SQL beim öffnen des Formulas?

Wer kann helfen?

Gruß

[oma]

Hallo,
2 Ereignisse sollten ausreichen:

Code [Auswählen] Erweitern

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

und

Code [Auswählen] Erweitern

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyEscape Then
   KeyCode = 0
   'MsgBox "Du hast die Esc -Taste gedrückt"
End IF
End Sub

Gruß Oma

[MzKlMu]

Hallo,
mit SQL kann es schon mal gar nicht gehen, wobei ich denke, das verwechselst Du mit VBA, damit geht es.
Im Ereignis "Bei Taste ab" folgenden Code:

Code [Auswählen] Erweitern

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If KeyCode = 27 Then KeyCode = 0
End Sub
Die Tastenvorschau des Formulars muss auf Ja stehen.

Edit:
Ich hatte es fertig und wollte es dann doch noch schreiben.

[oma]

Hallo,

sieht ja auch gut aus
und nun weiss ich auch das vbKeyEscape  = 27 ist

Gruß Oma

[SG05]

Danke, es klappt.....

Natürlich meine ich VBA und nicht SQL!  Sorry.....

Ich wünsche ein alle ein schönes WE