Útmutató: Delegálási metódus meghívása (Visual Basic)

Ez a példa bemutatja, hogyan társíthat metódust egy meghatalmazotthoz, majd hogyan hívhatja meg ezt a metódust a meghatalmazotton keresztül.

A delegálási és egyeztetési eljárások létrehozása

1. Hozzon létre egy delegáltat MySubDelegate.

   Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Deklaráljon egy olyan osztályt, amely a meghatalmazott aláírásával megegyező aláírású metódust tartalmaz.

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

3. Definiáljon egy metódust, amely létrehozza a meghatalmazott egy példányát, és meghívja a delegálthoz társított metódust a beépített Invoke metódus meghívásával.

   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
   

Lásd még

• Delegálási utasítás
• meghatalmazottak
• Események
• Többszálú alkalmazások