Como invocar um método delegado (Visual Basic)
Este exemplo mostra como associar um método um delegado e depois chama esse método através do delegado.
Cria um delegado de nome MySubDelegate.
Delegate Sub MySubDelegate(ByVal x As Integer)
Declare uma classe que contém um método com a mesma assinatura que o delegado.
Class class1 Sub Sub1(ByVal x As Integer) MsgBox("The value of x is: " & CStr(x)) End Sub End Class
Definir um método que cria uma instância do delegado e invoca o método associado com o delegado chamando interno Invoke método.
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