Gewusst wie: Aufrufen einer Delegatenmethode

Aktualisiert: November 2007

Dieses Beispiel zeigt, wie Sie eine Methode einem Delegaten zuweisen und diese Methode anschließend über den Delegaten aufrufen.

Erstellen des Delegaten und entsprechender Prozeduren

1. Erstellen Sie einen Delegaten mit dem Namen MySubDelegate.

       Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Deklarieren Sie eine Klasse, die eine Methode mit der gleichen Signatur wie der Delegat enthält.

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

3. Definieren Sie eine Methode, die eine Instanz des Delegaten erstellt und die Methode aufruft, die dem Delegaten zugewiesen ist. Rufen Sie dazu die integrierte Invoke-Methode auf.

       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
   

Siehe auch

Aufgaben

Gewusst wie: Schreiben von Ereignishandlern

Konzepte

Delegaten und der AddressOf-Operator

Ereignisse und Ereignishandler

AddHandler und RemoveHandler

Multithreadanwendungen

Referenz

Delegate-Anweisung