L'événement KeyDown en VB. NET

Un autre événement utile est l'événement KeyDown. Comme son nom l'indique, ce qui vous permet de détecter quand une touche du clavier a été enfoncée. Ceci est utile pour des choses comme la validation du texte dans une zone de texte.
Pour tester cela, ajoutez une zone de texte à votre formulaire. (Si vous n'avez pas suivi les cours, il suffit de commencer un nouveau projet et ajouter une zone de texte de votre nouveau formulaire.). Modifiez la propriété Text de la zone de texte «Appuyez sur F1 pour l'aide." Localisez la propriété TabIndex dans la zone de propriété, et le changer à zéro. (L'index de tabulation définit laquelle le contrôle est sélectionné lorsque la touche Tab est pressée sur le clavier. En spécifiant zéro comme la propriété TabIndex, vous dites que cela devrait être le premier contrôle sélectionné.)
Apportez votre fenêtre de code et cliquez sur la flèche qui indique la liste des contrôles et des objets dans votre projet:

Cliquez sur votre zone de texte à partir de la liste pour le sélectionner, comme dans l'image ci-dessus. Ensuite, cliquez sur la flèche de la chute de l'événement déroulant pour révéler les événements disponibles pour la zone de texte. Faites défiler la liste et sélectionnez l'événement KeyDown:

Lorsque vous sélectionnez l'événement KeyDown, un bout de code apparaît:

TextBox1_KeyDown Private Sub (sender As Object, ByVal e Comme System.Windows.Forms.KeyEventArgs) Poignées TextBox1.KeyDown

End Sub

L'événement qui est traitée est l'événement KeyDown de TextBox1. Remarquez, cependant, qu'il ya un argument légèrement différent entre parenthèses (juste e KeyEventArgs Comme dans la version 2012):

ByVal e As System.Windows.Forms.KeyEventArgs

Encore une fois, le nom de la variable est toujours e. Mais maintenant nous avons quelque chose qui s'appelle KeyEventArgs sur la fin. Cela signifie que la variable e tiendra informations sur la touche sur le clavier que vous essayez de détecter.

Pour voir quelles sont les propriétés de la variable e a à sa disposition, ajoutez la ligne suivante à votre code TextBox1_KeyDown:

Si e.KeyCode = Keys.F1 ensuite

TextBox1.Clear ()
MsgBox ("Help!")

End If

Dès que vous tapez le point après la lettre "e", vous verrez cette boîte pop up:

Double-cliquez sur une propriété pour l'ajouter à votre code. Après avoir tapé un signe égal, vous aurez une autre boîte pop up:

La liste est une liste de touches de votre clavier, dont certains que vous aurez et d'autres que vous ne serez pas. Faites défiler la liste jusqu'à ce que vous arrivez à Keys.F1, et double cliquez sur l'élément pour l'ajouter à votre code.
Le code de l'instruction if efface simplement la zone de texte et affiche un message.
Tentez votre programme sur. Appuyez sur F1 (Si vous réglez textIndex à zéro alors le texte dans la zone de texte doit être sélectionné et le curseur clignote déjà. Si ce n'est pas, cliquez à l'intérieur de la zone de texte et appuyez sur F1). Lorsque la touche F1 est pressée, vous devriez voir la boîte de message apparaît.
Une autre chose que vous pouvez faire est d'enregistrer les frappes au clavier par un utilisateur. Par exemple:

RecordText As cordes

RecordText = RecordText & Chr (e.KeyCode)

MsgBox (RecordText)

Le Chr () convertit un code d'activation (qui est un nombre entier) à son caractère de clavier.
Mais essayez cet exercice.

Exercice N

Il s'agit d'un événement à la disposition de la zone de texte appelé Donner. Ajouter une autre zone de texte à votre formulaire et écrire du code pour que les lettres d'un code postal sont convertis en majuscules lorsque l'utilisateur clique de votre première zone de texte et dans votre deuxième zone de texte.
Donc, votre première zone de texte peut lire "TS1 4jh". Lorsque l'utilisateur clique à l'intérieur textbox2, le texte de TextBox1 devraient changer à "TS1 4JH". Le code peut être écrit en cas de congé TextBox1.

Solution de l'exercice N

Il ya énormément d'activités à explorer, et nous aurons un oeil à quelques-un de plus - l'événement Form Load. Nous le ferons dans la prochaine partie.

Posted in: Visual Basic .NET