tuşa basıldığında olayı alttaki gibidir vb ortamında
sayın mesut yağmur formun açıldığında olayına
Me.KeyPreview = True
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyEscape
DoCmd.Close acForm, "formadi" 'formunu kapat
End Select
End Sub