Handles
更新：2007 年 11 月
声明某个过程处理一个指定事件。
proceduredeclaration Handles eventlist
各部分说明
proceduredeclaration
将处理事件的过程的 Sub 过程声明。eventlist
要处理的 proceduredeclaration 的事件的列表。此事件必须由当前类的基类或已使用 WithEvents 关键字声明的对象引发。
备注
在过程声明结尾处使用 Handles 关键字将使其处理由使用 WithEvents 关键字声明的对象变量所引发的事件。也可以在派生类中使用 Handles 关键字处理基类的事件。
该过程的签名必须与 eventlist 中各事件的签名相匹配。
Handles 关键字和 AddHandler 语句都允许您指定特定过程处理特定事件，但存在差异。定义过程时请使用 Handles 关键字以指定该过程处理特定事件。AddHandler 语句在运行时将过程连接到事件。有关更多信息，请参见 AddHandler 语句。
对于自定义事件，当它将过程添加为事件处理程序时，应用程序会调用该事件的 AddHandler 访问器。有关自定义事件的更多信息，请参见 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