方法: デリゲートメソッドを呼び出す (Visual Basic)

[アーティクル]
04/07/2023

この例では、メソッドをデリゲートに関連付け、デリゲートからそのメソッドを呼び出す方法を示します。

デリゲートおよび一致するプロシージャを作成する

MySubDelegate という名前のデリゲートを作成します。
```
Delegate Sub MySubDelegate(ByVal x As Integer)
```

デリゲートと同じシグネチャのメソッドを含むクラスを宣言します。

Class class1
    Sub Sub1(ByVal x As Integer)
        MsgBox("The value of x is: " & CStr(x))
    End Sub
End Class

デリゲートのインスタンスを作成して、デリゲートに関連付けられているメソッドを、組み込みの Invoke メソッドを呼び出すことで起動するメソッドを定義します。
```
Protected Sub DelegateTest()
    Dim c1 As New class1
    ' Create an instance of the delegate.
    Dim msd As MySubDelegate = AddressOf c1.Sub1
    ' Call the method.
    msd.Invoke(10)
End Sub
```

関連項目