Como: Invoke um método de representante
Este exemplo mostra como associar um método com um representante e, em seguida, chamar esse método por meio do delegado.
Crie o delegado e procedimentos correspondentes.
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 do 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 chama o método associado ao representante chamando o 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
Consulte também
Tarefas
Como: Escrever manipuladores evento
Conceitos
Delegados e o operador AddressOf
Eventos e manipuladores de eventos