Salut.

Je ne comprend pas pourquoi ce for each ne fonctionne pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
        Dim toto As MenuItem
        For Each toto In Menu.MenuItem
            If (toto.Tag = "set_default") Then
                MsgBox("ca marche")
            End If
        Next toto
J'ai un composant graphique (ZedGraph) et je voudrais afficher "ca marche" quand je clique droit sur le composant.

L'erreur est :
La référence d'objet n'est pas définie à une instance d'un objet.
Mais en aucun cas toto doit être dynamique.

Merci