Relativ gesehen ist die Verwendung von Ereignissen relativ einfach. Bevor wir es verwenden, müssen wir zunächst das Ereignis definieren, was bedeutet, Visual Basic darüber zu informieren, welches Ereignis aufgerufen wird. Ein Ereignis kann seine eigenen Parameter haben. Beispielsweise verfügt eine Befehlsschaltfläche über ein Click-Ereignis, das keine Parameter hat. Darüber hinaus verfügt das Textbearbeitungsfeld über ein KeyPRess-Ereignis, das verwandte Inhalte über einen Wert namens „KeyAscii“ verarbeitet.
Um ein Ereignis zu definieren, fügen Sie Code ähnlich dem folgenden zum allgemeinen Deklarationsabschnitt einer Klasse hinzu:
Rufen Sie dann die RaiseEvent-Methode im Code auf, um ein Ereignis auszulösen. Genau wie der folgende Code:
Um den oben beschriebenen Prozess des Hinzufügens und Auslösens von Ereignissen besser zu veranschaulichen, nehmen wir ein Beispiel. Definieren Sie zunächst ein Ereignis:
Fügen Sie den folgenden Code im allgemeinen Deklarationsabschnitt der CDog-Klasse hinzu:
Fügen Sie den Sleep-Unterprozess in der CDog-Klasse hinzu:
Im Code werden zu Beginn einige nutzlose Schleifen 1.000.000 Mal ausgeführt. Nachdem der Computer kurz pausiert hat, löst der Sleep-Unterprozess das Awake-Ereignis aus.
Aber sollten wir das Programm entsprechend reagieren lassen, nachdem das Awake-Ereignis eintritt? Natürlich ist die Verwendung einer Befehlsschaltfläche am einfachsten. Wählen Sie einfach das Befehlsschaltflächenobjekt in der Liste im Codefenster aus.
Aber in diesem Fall brauchen wir unbedingt eine Kontrolle, und alles, was wir sehen, steht auf dem Formular. Hier verwenden wir lediglich den entsprechenden Code und dieser ist unsichtbar.
Natürlich erfordert die Verwendung von Code zum Empfangen von Ereignissen zusätzliche Vorgänge:
Fügen Sie im Abschnitt „Allgemeine Deklarationen“ des Formularcodefensters den folgenden Code hinzu:
Dieser Code unterscheidet sich von der vorherigen MyDog-Deklaration. Er verfügt über das Schlüsselwort WithEvents, das Visual Basic darüber informiert, dass das Objekt jedes Ereignis empfangen kann und das Objekt das Ereignis empfangen muss.
Löschen Sie den gesamten Code in der Befehlsschaltfläche und fügen Sie den folgenden Code in Command1 hinzu:
Der Code setzt MyDog einfach auf eine neue Instanz von CDog, legt den Namen fest, ruft Bark auf und führt schließlich den Sleep-Unterprozess aus.
Fügen Sie nun Code hinzu, um auf das Awake-Ereignis zu reagieren.
Wählen Sie im Formularcodefenster „MyDog“ aus der Objekt-Dropdown-Liste aus;
Fügen Sie im „Awake“-Ereignis von „MyDog“ den folgenden Code hinzu:
Okay, jetzt ist es Zeit zum Testen.
Drücken Sie F5, um das Programm auszuführen.
Klicken Sie auf die Befehlsschaltfläche.
Auf diese Weise beginnt der Welpe, wenn er bellt, ein Nickerchen zu machen und wird am Ende von Ihnen geweckt. Es ist erstaunlich!
->