Share via


Nasıl yapılır: Temsilci Yöntemi Çağırma (Visual Basic)

Bu örnekte, bir yöntemin temsilciyle nasıl ilişkilendirilip temsilci aracılığıyla çağrılacağı gösterilmektedir.

Temsilci ve eşleşen yordamları oluşturma

  1. adlı MySubDelegatebir temsilci oluşturun.

    Delegate Sub MySubDelegate(ByVal x As Integer)
    
  2. Temsilciyle aynı imzaya sahip bir yöntem içeren bir sınıf bildirin.

    Class class1
        Sub Sub1(ByVal x As Integer)
            MsgBox("The value of x is: " & CStr(x))
        End Sub
    End Class
    
  3. Temsilcinin bir örneğini oluşturan ve yerleşik Invoke yöntemi çağırarak temsilciyle ilişkili yöntemi çağıran bir yöntem tanımlayın.

    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
    

Ayrıca bkz.