Cara: Memanggil Metode Delegasi (Visual Basic)

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

Membuat delegasi dan prosedur pencocokan

1. Untuk membuat delegasi bernama MySubDelegate.

   Delegate Sub MySubDelegate(ByVal x As Integer)
   

2. Nyatakan kelas yang berisi metode dengan tanda tangan yang sama dengan 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 panggil metode yang terkait dengan delegasi dengan memanggil metode Invoke bawaan.

   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 Delegate (Delegasi)
• Delegasi
• Peristiwa
• Aplikasi Multithreaded