Bonjour tout le monde,

J'ai une question sur les combo box :

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

Code : Sélectionner tout - Visualiser dans une fenêtre à part
"SELECT * FROM monnaie WHERE id = " & listLesPiecesDeMonnaies(0).ItemData(listLesPiecesDeMonnaies(0).ListIndex), True)
ça :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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