Récupérer l'index lors d'un clic sur menustrip

Bonjour tout le monde,

J'aimerais savoir comment déterminer, lors d'un clic dans un menu strip, s'il s'agit du premier deuxième, troisième etc...item de la liste (par exemple: dans le menu fichier de firefox, nouvel onglet est le deuxième) ?
Quelqu'un sait si cela est possible ?

Merci de m'avoir lu :)

En mettant ca dans la sub qui traite le click sur tes sous menus par exemple (Mon menu principal s'appelant FileToolStripMenuItem dans ce cas) :

Code:

---

1 2 3 4

Dim MenuCollection As ToolStripItemCollection MenuCollection = FileToolStripMenuItem.DropDownItems Debug.Print(MenuCollection.IndexOf(sender))

---

Citation:

---

Envoyé par OhMonBato

En mettant ca dans la sub qui traite le click sur tes sous menus par exemple (Mon menu principal s'appelant FileToolStripMenuItem dans ce cas) :

Code:

---

1 2 3 4

Dim MenuCollection As ToolStripItemCollection MenuCollection = FileToolStripMenuItem.DropDownItems Debug.Print(MenuCollection.IndexOf(sender))

---

---

Pour chaque item cliqué, le logiciel me retourne -1. Saurais-tu d'où ça vient ?

Peux tu plutot nous donner ton code complet pour la sub ?

Citation:

---

Envoyé par OhMonBato

Peux tu plutot nous donner ton code complet pour la sub ?

---

Bien sûr:

Code:

---

1 2 3 4 5

Private Sub Table_DropDownItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles Table.DropDownItemClicked Dim MenuCollection As ToolStripItemCollection MenuCollection = Table.DropDownItems MsgBox(MenuCollection.IndexOf(sender).ToString) End Sub

---

Alors on recommence... J'ai un menu principal, appele PrincipalToolStripMenuItem. Ce menu comporte 3 sous menus appeles SousMenu1ToolStripMenuItem, SousMenu2ToolStripMenuItem, SousMenu3ToolStripMenuItem

J'ai donc le code :

Code:

---

1 2 3 4 5 6

PrivateSub Click_Pour_SousMenus(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SousMenu1ToolStripMenuItem.Click, SousMenu2ToolStripMenuItem.Click, SousMenu3ToolStripMenuItem.Click Dim MenuCollection As ToolStripItemCollection MenuCollection = PrincipalToolStripMenuItem.DropDownItems MsgBox(MenuCollection.IndexOf(sender).ToString) EndSub

---

Et ca marche ;)