Relativement parlant, l’utilisation des événements est relativement simple. Avant de l'utiliser, nous devons d'abord définir l'événement, ce qui signifie indiquer à Visual Basic quel événement est appelé. Un événement peut avoir ses propres paramètres. Par exemple, un bouton de commande possède un événement Click, qui n'a aucun paramètre. De plus, la zone d'édition de texte possède un événement KeyPRess, qui gère le contenu associé via une valeur appelée « KeyAscii ».
Pour définir un événement, ajoutez un code similaire au suivant à la section de déclaration générale d'une classe :
Appelez ensuite la méthode RaiseEvent dans le code pour déclencher un événement. Tout comme le code suivant :
Pour mieux illustrer le processus ci-dessus d'ajout et de déclenchement d'événements, prenons un exemple. Tout d’abord, définissez un événement :
Ajoutez le code suivant dans la section de déclaration générale de la classe CDog :
Ajoutez le sous-processus Sleep dans la classe CDog :
Dans le code, certaines boucles inutiles sont exécutées 1 000 000 de fois au début. Après une brève pause de l'ordinateur, le sous-processus Sleep déclenche l'événement Awake.
Mais après l’événement Awake, devrions-nous laisser le programme réagir en conséquence ? Bien sûr, utiliser un bouton de commande est le plus simple, il suffit de sélectionner l’objet bouton de commande dans la liste de la fenêtre de code.
Mais dans ce cas, nous avons absolument besoin d’un contrôle, et tout ce que nous voyons se trouve sur le formulaire. Ici, nous utilisons uniquement le code correspondant et il est invisible.
Bien entendu, utiliser du code pour recevoir des événements nécessite des opérations supplémentaires :
Dans la section Déclarations communes de la fenêtre Code du formulaire, ajoutez le code suivant :
Ce code est différent de la déclaration MyDog précédente. Il contient le mot clé WithEvents pour informer Visual Basic que l'objet peut recevoir n'importe quel événement et que l'objet doit recevoir l'événement.
Supprimez tout le code du bouton de commande et ajoutez le code suivant dans Command1 :
Le code définit simplement MyDog sur une nouvelle instance de CDog, définit le nom, appelle Bark et exécute enfin le sous-processus Sleep.
Ajoutez maintenant du code pour répondre à l’événement Awake.
Dans la fenêtre Code du formulaire, sélectionnez « MyDog » dans la liste déroulante des objets ;
Dans l'événement "Awake" de "MyDog", ajoutez le code suivant :
Bon, il est maintenant temps de tester.
Appuyez sur F5 pour exécuter le programme ;
Cliquez sur le bouton Commande ;
De cette façon, lorsque le chiot aboie, il commence à faire une sieste et est réveillé par vous à la fin. C'est incroyable !
->