HOW TO：建立事件和處理常式 (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 陳述式必須限定在定義事件與事件處理常式的物件中。