KeyDown événement clé Non travail - VB.net

Question

événement KeyDown ne fonctionne pas, appuyer sur escape la forme ne ferme pas

Private Sub DataTable_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown 
    If e.KeyCode = Keys.Escape Then 
     Me.Close() 
    End If 
End Sub 

Answer 1

Eh bien, que cela fonctionne, l'événement est tout simplement pas très semblable au feu. Les touches font monter l'événement KeyDown sur le contrôle avec le focus. Cela ne sera jamais votre forme quand il n'y a pas de contrôles qui peuvent obtenir l'attention. Un scénario assez improbable.

Si vous avez déjà un bouton intitulé "Annuler" qui ferme le formulaire, définissez le CancelButton property du formulaire.

Si vous ne disposez pas d'un tel bouton, il est peu probable que l'utilisateur découvre lui-même que la touche Echap est utile. Il utilisera très probablement le bouton Fermer dans le coin supérieur droit. Vous pouvez néanmoins le faire en remplaçant la méthode ProcessCmdKey(). Comme ceci:

Protected Overrides Function ProcessCmdKey(ByRef msg As Message, keyData As Keys) As Boolean 
    If keyData = Keys.Escape Then 
     Me.Close() 
     Return True 
    End If 
    Return MyBase.ProcessCmdKey(msg, keyData) 
End Function