如何:创建事件和处理程序 (Visual Basic)
更新:2007 年 11 月
此示例定义事件 TimeExpired 和事件处理程序 HandleTimeExpired,并且使用 AddHandler 语句将它们相关联。
示例
Public Event TimeExpired(ByVal Status As String)
Public Sub HandleTimeExpired(ByVal Status As String)
' Perform desired processing for when time has expired.
MsgBox("HandleTimeExpired caught the TimeExpired event" & _
vbCrLf & "Status = " & Status)
End Sub
Public Sub SetUpEventHandler()
AddHandler TimeExpired, AddressOf HandleTimeExpired
End Sub
编译代码
此示例需要:
访问 System 命名空间的成员。如果没有在代码中完全限定成员名称,请添加 Imports 语句。有关更多信息,请参见 Imports 语句(.NET 命名空间和类型)。
Event 语句处于类级别且不在任何过程内。
Event 语句和两个过程(HandleTimeExpired 和 SetUpEventHandler)都是在同一类或模块中定义的。否则,AddHandler 语句必须将该事件和处理程序限定为在其中定义了它们的对象。