Postupy: Volání metody delegáta (Visual Basic)

Tento příklad ukazuje, jak přiřadit delegáta metodu a poté vyvolá metodu prostřednictvím delegáta.

Vytvořit delegáta a odpovídající postupy

1. Vytvořit delegáta s názvem MySubDelegate.

       Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Třída obsahující metody s stejný podpis jako delegáta Deklarujte.

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

3. Definovat metodu, která vytvoří instanci delegáta a vyvolá metodu spojené s delegátem voláním integrovaná Invoke metoda.

       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
   

Viz také

Referenční dokumentace

Delegate – příkaz

Koncepty

Vícevláknové aplikace (C# and Visual Basic)

Další zdroje

Delegáti (Visual Basic)

Události (Visual Basic)