Procedimiento para invocar un método Delegate (Visual Basic)

En este ejemplo se muestra cómo asociar un método a un delegado y, a continuación, invocar ese método a través del delegado.

Creación del delegado y procedimientos coincidentes

1. Cree un delegado denominado MySubDelegate.

   Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Declare una clase que contenga un método con la misma firma que el delegado.

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

3. Defina un método que cree una instancia del delegado e invoque el método asociado al delegado llamando al método integrado 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
   

Consulte también

• Declaración de Delegado
• delegados
• Eventos
• Aplicaciones multiproceso