Hvordan lukker jeg en formular med ESC tasten

Jeg har prøvet følgende (som også virker fint ved F-taster):

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


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
        Case vbKeyF4
        DoCmd.Close
        Case Else
    End Select
End Sub

Er der nogle der kan hjælpe med hvordan jeg definerer andre taster end funktionstaster, f.eks. esc, og enter.