方法 : 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

参照

処理手順

方法 : イベント ハンドラを記述する

概念

イベントとイベント ハンドラ

デリゲートと AddressOf 演算子

AddHandler と RemoveHandler