イベント (Visual Basic)

Visual Studio プロジェクトとは、順に実行される一連のプロシージャと思っているかもしれませんが、実際には、ほとんどのプログラムはイベント ドリブン型です。つまり、実行の流れは、外部で発生する "イベント" と呼ばれる事象によって決まります。

イベントは、何らかの重要な出来事が発生したことをアプリケーションに通知するシグナルです。 たとえば、ユーザーがフォーム上のコントロールをクリックすると、フォームは、Click イベントを発生させて、そのイベントを処理するプロシージャを呼び出すことができます。 イベントは、複数のタスク間の通信を可能にすることもできます。 たとえば、メインのアプリケーションとは別のアプリケーションで並べ替えタスクを実行するとします。 ユーザーが並べ替えを取り消した場合、アプリケーションは並べ替え処理の停止を指示するキャンセル イベントを送信できます。

イベントの用語と概念

このセクションでは、Visual Studio で使用される用語と概念について説明します。

イベントの宣言

イベントは、次の例に示すように、Event キーワードを使用して、クラス、構造体、モジュール、およびインターフェイス内で宣言します。

Event AnEvent(ByVal EventNumber As Integer)

イベントの発生

イベントは、重要な出来事が発生したことを通知するメッセージに似ています。 メッセージをブロードキャストする動作は、"イベントの発生" と呼ばれます。 Visual Studio では、次の例に示すように、RaiseEvent ステートメントを使用してイベントを発生させます。

RaiseEvent AnEvent(EventNumber)

イベントは、イベントを宣言しているクラス、モジュール、または構造体のスコープ内で発生させる必要があります。 たとえば、基本クラスから継承された派生クラスでイベントを発生させることはできません。

イベントの送信元

イベントを発生させる機能を持つオブジェクトが "イベントの送信元" になります。これは "イベント ソース" とも呼ばれます。 イベントの送信元の例として、フォーム、コントロール、およびユーザー定義オブジェクトがあります。

イベント ハンドラー

"イベント ハンドラー" は、対応するイベントが発生したときに呼び出されるプロシージャです。 イベント ハンドラーと一致するシグネチャを持つ任意の有効なサブルーチンを使用できます。 ただし、関数はイベント ソースに値を返すことができないため、イベント ハンドラーとして使用することはできません。

Visual Studio では、イベント ハンドラーの標準的な名前付け規則である、イベントの送信元、アンダースコア、およびイベントの名前の組み合わせを使用しています。 たとえば、button1 という名前のボタンの Click イベントには、Sub button1_Click という名前が付けられます。

イベントとイベント ハンドラーの関連付け

イベント ハンドラーを使用する前に、Handles ステートメントまたは AddHandler ステートメントを使用して、イベントをイベント ハンドラーに関連付けておく必要があります。

WithEvents と Handles 句

WithEvents ステートメントと Handles 句を使用して、指定するイベント ハンドラーを宣言できます。 WithEvents キーワードを使用して宣言されたオブジェクトによって発生したイベントは、次の例に示すように、そのイベント用の Handles ステートメントがある任意のプロシージャで処理できます。

' Declare a WithEvents variable.
Dim WithEvents EClass As New EventClass

' Call the method that raises the object's events.
Sub TestEvents()
    EClass.RaiseEvents()
End Sub

' Declare an event handler that handles multiple events.
Sub EClass_EventHandler() Handles EClass.XEvent, EClass.YEvent
    MsgBox("Received Event.")
End Sub

Class EventClass
    Public Event XEvent()
    Public Event YEvent()
    ' RaiseEvents raises both events.
    Sub RaiseEvents()
        RaiseEvent XEvent()
        RaiseEvent YEvent()
    End Sub
End Class

多くの場合、イベント ハンドラーを指定するための最善の選択は、WithEvents ステートメントと Handles 句を使用することです。これは、宣言型の構文により簡単にコーディング、読み取り、デバッグを実行できるためです。 ただし、WithEvents 変数には、次の使用制限があることに注意してください。

• WithEvents 変数をオブジェクト変数として使用することはできません。 つまり、Object として宣言することはできません。変数を宣言するときは、クラス名を指定する必要があります。

• 共有イベントはクラス インスタンスに関連付けられないため、WithEvents を使用して共有イベントを宣言によって処理することはできません。 同様に、WithEvents またはHandles を使用して Structure からイベントを処理することはできません。 どちらの場合も、AddHandler ステートメント使用して、これらのイベントを処理することができます。

• WithEvents 変数の配列を作成することはできません。

WithEvents 変数を使用して、1 つのイベント ハンドラーで 1 つまたは複数の種類のイベントを、または 1 つまたは複数のイベント ハンドラーで同じ種類のイベントを処理することができます。

Handles 句は、イベントをイベント ハンドラーに関連付けるための標準的な方法ですが、イベントをイベント ハンドラーに関連付ける動作はコンパイル時に限定されます。

場合によっては (フォームやコントロールに関連付けられたイベントなど)、Visual Studio は、空のイベント ハンドラーを自動的にスタブとして作成し、それをイベントに関連付けます。 たとえば、デザイン モードでフォームのコマンド ボタンをダブルクリックすると、次のコードに示すように、Visual Studio はコマンド ボタン用の空のイベント ハンドラーと WithEvents 変数を作成します。

Friend WithEvents Button1 As System.Windows.Forms.Button
Protected Sub Button1_Click() Handles Button1.Click
End Sub

AddHandler と RemoveHandler

AddHandler ステートメントは、イベント ハンドラーを指定できるという点で Handles 句に似ています。 ただし、AddHandler を RemoveHandler と一緒に使用すると、Handles 句よりも柔軟性が増し、イベントに関連付けられたイベント ハンドラーを動的に追加、削除、変更することができます。 共有イベントまたは構造体からのイベントを処理する場合は、AddHandler を使用する必要があります。

AddHandler は 2 つの引数 (コントロールなどのイベントの送信元から渡されるイベント名と、デリゲートを評価する式) を使用します。 AddHandler を使用する場合はデリゲート クラスを明示的に指定する必要がありません。これは、AddressOf ステートメントが常にデリゲートへの参照を返すためです。 次の例では、オブジェクトによって発生するイベントにイベント ハンドラーを関連付けます。

AddHandler Obj.XEvent, AddressOf Me.XEventHandler

イベントとイベント ハンドラーと関連付けを解除する RemoveHandler は、AddHandler と同じ構文を使用します。 次に例を示します。

RemoveHandler Obj.XEvent, AddressOf Me.XEventHandler

次の例では、イベントにイベント ハンドラーが関連付けられた後、イベントが発生します。 イベント ハンドラーがイベントをキャッチし、メッセージを表示します。

次に、最初のイベント ハンドラーが削除され、別のイベント ハンドラーがイベントに関連付けられます。 もう一度イベントが発生し、別のメッセージが表示されます。

最後に、2 つ目のイベント ハンドラーが削除され、3 回目のイベントが発生します。 イベントに関連付けられているイベント ハンドラーがないため、何も実行されません。

Module Module1

    Sub Main()
        Dim c1 As New Class1
        ' Associate an event handler with an event.
        AddHandler c1.AnEvent, AddressOf EventHandler1
        ' Call a method to raise the event.
        c1.CauseTheEvent()
        ' Stop handling the event.
        RemoveHandler c1.AnEvent, AddressOf EventHandler1
        ' Now associate a different event handler with the event.
        AddHandler c1.AnEvent, AddressOf EventHandler2
        ' Call a method to raise the event.
        c1.CauseTheEvent()
        ' Stop handling the event.
        RemoveHandler c1.AnEvent, AddressOf EventHandler2
        ' This event will not be handled.
        c1.CauseTheEvent()
    End Sub

    Sub EventHandler1()
        ' Handle the event.
        MsgBox("EventHandler1 caught event.")
    End Sub

    Sub EventHandler2()
        ' Handle the event.
        MsgBox("EventHandler2 caught event.")
    End Sub

    Public Class Class1
        ' Declare an event.
        Public Event AnEvent()
        Sub CauseTheEvent()
            ' Raise an event.
            RaiseEvent AnEvent()
        End Sub
    End Class

End Module

基本クラスから継承されたイベントの処理

"派生クラス" は基本クラスから特性を継承したクラスであり、基本クラスによって発生したイベントを Handles MyBase ステートメントを使用して処理できます。

基本クラスのイベントを処理するには

• イベント ハンドラー プロシージャの宣言行に Handles MyBase.eventname ステートメントを追加して、派生クラスのイベント ハンドラーを宣言します。eventname は処理する基本クラスのイベント名です。 次に例を示します。

  Public Class BaseClass
      Public Event BaseEvent(ByVal i As Integer)
      ' Place methods and properties here.
  End Class
  
  Public Class DerivedClass
      Inherits BaseClass
      Sub EventHandler(ByVal x As Integer) Handles MyBase.BaseEvent
          ' Place code to handle events from BaseClass here.
      End Sub
  End Class
  

関連項目