Anvisningar: Anropa en ombudsmetod (Visual Basic)

Det här exemplet visar hur du associerar en metod med ett ombud och sedan anropar den metoden via ombudet.

Skapa ombuds- och matchningsprocedurerna

1. Skapa ett ombud med namnet MySubDelegate.

   Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Deklarera en klass som innehåller en metod med samma signatur som ombudet.

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

3. Definiera en metod som skapar en instans av ombudet och anropar metoden som är associerad med ombudet genom att anropa den inbyggda Invoke metoden.

   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
   

Se även

• Ombudsuttryck
• Delegater
• Händelser
• Flertrådade program