共用方式為


Handles 子句 (Visual Basic)

宣告由程序處理指定的事件。

proceduredeclaration Handles eventlist

組件

  • proceduredeclaration
    將處理事件之程序的 Sub 程序宣告。

  • eventlist
    要由 proceduredeclaration 處理的事件的清單,以逗號分隔。 事件必須由目前類別的基底類別,或是由使用 WithEvents 關鍵字宣告的物件來引發。

備註

在程序宣告結尾使用 Handles 關鍵字,可以讓它處理以 WithEvents 關鍵字宣告之物件變數所引發的事件。 Handles 關鍵字也可以使用於衍生類別,處理來自基底類別的事件。

程序的簽章必須符合 eventlist 中每個事件的簽章。

Handles 關鍵字和 AddHandler 陳述式都可供您指定特殊程序處理特殊事件,但兩者有所差異。 當定義程序以指定它處理特殊事件時,請使用 Handles 關鍵字。 AddHandler 陳述式會在執行階段將程序連接至事件。 如需詳細資訊,請參閱 AddHandler 陳述式

對於自訂事件而言,應用程式會在加入程序做為事件處理常式時,叫用 (Invoke) 事件的 AddHandler 存取子 (Accessor)。 如需自訂事件的詳細資訊,請參閱Event 陳述式

範例

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

下列範例說明衍生類別如何使用 Handles 陳述式處理來自基底類別的事件。

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

下列範例包含 WPF 應用程式專案的兩個按鈕事件處理常式。

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

下列範例的作用與上一個範例相同。 Handles 子句中的 eventlist 包含這兩個按鈕的事件。

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

請參閱

參考

WithEvents (Visual Basic)

AddHandler 陳述式

RemoveHandler 陳述式

Event 陳述式

RaiseEvent 陳述式

其他資源

事件 (Visual Basic)