Cara: Memanggil Metode Delegasi (Visual Basic)

Contoh ini menunjukkan cara mengaitkan metode dengan delegasi lalu memanggil metode tersebut melalui delegasi.

Membuat prosedur delegasi dan pencocokan

1. Buat delegasi bernama MySubDelegate.

   Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Deklarasikan kelas yang mengandung metode dengan tanda tangan yang sama seperti delegasi.

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

3. Tentukan metode yang membuat instans delegasi dan memanggil metode yang terkait dengan delegasi dengan memanggil metode bawaan 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
   

Lihat juga

• Pernyataan Delegasi
• Delegasi
• Peristiwa
• Aplikasi Multithreaded