HOW TO：處理 Visual Basic 中的事件

更新：2007 年 11 月

下列範例會定義類別，此類別會在您呼叫 CauseEvent 方法時引發事件。這個事件是由名為 EventHandler 的事件處理常式程序所處理。

範例

描述

若要執行這個範例，請將下列程式碼加入至 Visual Basic Windows 應用程式專案的表單類別，並呼叫具有整數引數的 TestEvents 程序。

程式碼

Public Class Class1
    ' Declare an event for this class.
    Public Event Event1(ByVal EventNumber As Integer)
    ' Define a method that raises an event.
    Sub CauseEvent(ByVal EventNumber As Integer)
        RaiseEvent Event1(EventNumber)
    End Sub
End Class

Protected Sub TestEvents(ByVal EventNumber As Integer)
    Dim Obj As New Class1
    AddHandler Obj.Event1, AddressOf Me.EventHandler
    ' Cause the object to raise an event.
    Obj.CauseEvent(EventNumber)
End Sub

Sub EventHandler(ByVal EventNumber As Integer)
    MsgBox("Received event number " & EventNumber.ToString)
End Sub

請參閱

工作

HOW TO：撰寫事件處理常式

概念

事件和事件處理常式

委派和 AddressOf 運算子

AddHandler 和 RemoveHandler