Handles – Klauzule (Visual Basic)
Prohlašuje, že postup zpracovává zadané události.
proceduredeclaration Handles eventlist
Části
proceduredeclaration
Sub Prohlášení postup pro postup, který bude zpracovávat události.eventlist
Seznam událostí pro proceduredeclaration zpracování, oddělených čárkami.Události musí být zvýšena buď základní třídy aktuální třídy nebo objektu deklarovány pomocí WithEvents klíčové slovo.
Poznámky
Použití Handles klíčové slovo na konci postupu prohlášení způsobit jeho zpracování událostí vyvolaných objektové proměnné deklarované pomocí WithEvents klíčové slovo.Handles Klíčové slovo lze také v odvozené třídě ke zpracování událostí ze základní třídy.
Podpis postup musí odpovídat podpisy každé události v eventlist.
Handles Klíčové slovo a AddHandler prohlášení obou umožňují zadat konkrétní postupy zpracování událostí, zejména, že existují rozdíly.Použití Handles klíčové slovo při definování postupu určení zpracovává určité události.AddHandler Prohlášení připojí postupy k události v době spuštění.Další informace naleznete v tématu AddHandler – příkaz.
Pro vlastní události, aplikace vyvolá na událost AddHandler přístupový objekt při postupu přidá jako obslužnou rutinu události.Další informace o vlastních událostí viz Event – příkaz.
Příklad
Public Class ContainerClass
' Module or class level declaration.
WithEvents Obj As New Class1
Public Class Class1
' Declare an event.
Public Event Ev_Event()
Sub CauseSomeEvent()
' Raise an event.
RaiseEvent Ev_Event()
End Sub
End Class
Sub EventHandler() Handles Obj.Ev_Event
' Handle the event.
MsgBox("EventHandler caught event.")
End Sub
' Call the TestEvents procedure from an instance of the ContainerClass
' class to test the Ev_Event event and the event handler.
Public Sub TestEvents()
Obj.CauseSomeEvent()
End Sub
End Class
Následující příklad ukazuje, jak použít odvozené třídy Handles příkaz zpracovat událost ze základní třídy.
Public Class BaseClass
' Declare an event.
Event Ev1()
End Class
Class DerivedClass
Inherits BaseClass
Sub TestEvents() Handles MyBase.Ev1
' Add code to handle this event.
End Sub
End Class
Následující příklad obsahuje dvě tlačítka obslužné rutiny Aplikací WPF projektu.
Private Sub Button1_Click(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles Button1.Click
MessageBox.Show(sender.Name & " clicked")
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles Button2.Click
MessageBox.Show(sender.Name & " clicked")
End Sub
Následující příklad je ekvivalentní předchozí příklad.eventlist v Handles klauzule obsahuje události pro obě tlačítka.
Private Sub Button_Click(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles Button1.Click, Button2.Click
MessageBox.Show(sender.Name & " clicked")
End Sub