Question sur l'item data de la combo box

Bonjour tout le monde,

J'ai une question sur les combo box :

Ce code me permet de récupérer l'ID :

Code:

---

"SELECT * FROM monnaie WHERE id = " & listLesPiecesDeMonnaies(0).ItemData(listLesPiecesDeMonnaies(0).ListIndex), True)

---

ça :

Code:

---

listLesPiecesDeMonnaies(0).ListIndex

---

J'ai compris que c'est comme l'indice d'un tableau, chaque élément de la liste contient un numéro.

Je me pose surtout la question sur l'ItemData.

À quoi correspond l'ItemData ?

Est-ce qu'il change ?

Ce code me dit que l'item data ne change pas :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub Form_Load() ' Remplit List1 et le tableau ItemData à l'aide ' des éléments correspondants triés. List1.AddItem "Lucie Gombaud" List1.ItemData(List1.NewIndex) = 42310 List1.AddItem "Véronique Le Goff" List1.ItemData(List1.NewIndex) = 52855 List1.AddItem "Marie-Louise Vierne" List1.ItemData(List1.NewIndex) = 64932 List1.AddItem "François Rhein" List1.ItemData(List1.NewIndex) = 39227 End Sub   Private Sub List1_Click() ' Ajoute le numéro et le nom de l'employé. Msg = List1.ItemData(List1.ListIndex) & " " Msg = Msg & List1.List(List1.ListIndex) Label1.Caption = Msg End Sub

---

Merci d'avance.

beegees

Itemdata est la collection soeur de la collection list dans une liste déroulante ou un combo. Il existe un ItemData(x) pour chaque ListItem(X). Par contre , on ne peut y stocker qu'une valeur numérique entière.

Exemple:

Code:

---

1 2 3

List.AddItem "Toto" DerniereEntree = List1.NewIndex 'Donne le numero du dernier item créé List1.ItemData(DerniereEntree ) = 5

---

Bonjour et Joyeux Noël,

Merci beaucoup pour ta réponse.

beegees