Not
Bu sayfaya erişim yetkilendirme gerektiriyor. Oturum açmayı veya dizinleri değiştirmeyi deneyebilirsiniz.
Bu sayfaya erişim yetkilendirme gerektiriyor. Dizinleri değiştirmeyi deneyebilirsiniz.
Bu örnekte, bir yöntemin temsilciyle nasıl ilişkilendirilip temsilci aracılığıyla çağrılacağı gösterilmektedir.
Temsilci ve eşleşen prosedürleri oluştur
adlı
MySubDelegatebir temsilci oluşturun.Delegate Sub MySubDelegate(ByVal x As Integer)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 ClassTemsilcinin bir örneğini oluşturan ve yerleşik
Invokeyö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