Comment : appeler une méthode déléguée
Mise à jour : novembre 2007
Cet exemple montre comment associer une méthode à un délégué, puis comment appeler cette méthode par le biais du délégué.
Création du délégué et des procédures correspondantes
Créez un délégué nommé MySubDelegate.
Delegate Sub MySubDelegate(ByVal x As Integer)
Déclarez une classe qui contient une méthode avec la même signature que le délégué.
Class class1 Sub Sub1(ByVal x As Integer) MsgBox("The value of x is: " & CStr(x)) End Sub End Class
Définissez une méthode qui crée une instance du délégué et appelle la méthode associée au délégué en appelant la méthode Invoke intégrée.
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
Voir aussi
Tâches
Comment : écrire des gestionnaires d'événements
Concepts
Délégués et opérateur AddressOf
Événements et gestionnaires d'événements