|
Dans la programmation informatique, de déclencher un événement signifie pour appeler une fonction d'annoncer quelque chose s'est passé . Vous soulevez des événements dans Visual Basic en utilisant l'instruction " RaiseEvent " . Pour lever tout état de cause , vous devez d'abord déclarer sa source au niveau du module de la classe , un module ou d'une structure dans laquelle vous souhaitez l'utiliser . De là, vous pouvez déclencher l'événement à partir de n'importe où dans la même source de sa déclaration d'événement . En outre, utiliser une variable " WithEvents " ou l'objet à gérer les événements déclenchés . Instructions
1 Ouvrez Visual Basic et commencer un nouveau projet d' application de formulaires . Double- cliquez sur le contrôle "Button" pour l'ajouter à votre formulaire. Double- cliquez sur le contrôle "Label" pour l'ajouter à la forme , aussi.
2 presse "F7 " pour ouvrir la fenêtre de code . Tapez la commande suivante pour déclarer une nouvelle classe et créer des éléments au niveau de la classe : Trouvez public class MyEvent
clics privé le plus court = 0
Private WithEvents gimmick Comme MyEvent < br > publique événement ajouterCliquer ()
toute manifestation appelée par l'instruction " RaiseEvent » doit être déclarée au niveau de la classe, et tout objet qui gère un événement doit utiliser l'instruction " WithEvents " .
3 Tapez la commande suivante dans le " Form1_Load " sous : .
myObject = New MyEvent
Cela crée un objet de la " MyEvent " class of
4 Tapez la commande suivante pour créer un nouveau sous :
public Sub clicked ( )
RaiseEvent ajouterCliquer ()
End Sub
Lorsqu'elle est appelée, cette fonction déclenche l'événement ajouterCliquer vous avez déclaré au niveau de la classe
5 Tapez la commande suivante pour créer un sous-marin qui gère l'événement : .
Private Sub Display ( ) Poignées myObject.AddClick
Label1.Text = " fois vous avez cliqué : " & clics
End Sub
Lorsque l'événement " ajouterCliquer " est levé, le code de la sous mises à jour le texte sur Label1
6 type de ce qui suit pour gérer le clic sur le bouton événement : .
Private Sub Button1_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs ) poignées Button1.Click
clics + = 1
myObject.Clicked ()
End Sub
Lorsque l'utilisateur clique sur le bouton , les "clics" incréments variables par un et de l'objet appelle la fonction "clicked" , qui déclenche un événement .
|
