Combobox!!!!!!!!!!!!!!!!!

Bonsoir
Plutot que d'utiliser ItemData utilise AddItem tous simplement c'est plus souple.
Pour ton probleme tu peut faire comme ceci: Dans la procedure d'ajout des données, evenement Click d'un CommandButton (par Ex) For i = 0 to 10
MonTexte="ABCDEF" & Str(i)
MonCombo.additem(MonTexte)
Next i
Maintenant dans l'événement Click du Combo
Private Sub MonCombo_Click()
Select case MonCombo.ListIndex
Case 1
Call MaSubAffichage
case 2
Call MaSubImprime
Case x
Text1.text="TOTO"
Case else
Load Form2
End Select
End Sub
MonCombo.ListIndex retourne l'Index de l'élément selectionné dans la liste
J'utilise la fonction d'appel au Sub CALL, pour que tu comprennes qu'il s'agit d'un appel à un Sub exterieur
Mais le CALL n'est plus employé en Prog aujourd'hui, on appelle la procedure(Sub) directement par son nom
Le Seul inconvénient à ce genre de Prog c'est que tu es limité dans ta liste, puisque l'on utilise 1,2,3,.....x dans le Case. Si tu n'a que 10 Index bon ça va mais si tu en a 10000 tu ne peut pas te permettre ça! Mais la c'est un autre Prog. Bon ben voila
si tu as des soucis n'hesite pas
Hugues

merci hugues mais pour t'expliquer mon probleme un peux plus prècisement et t'envoyer mon fichier source j'aimerai avoir ton email
merci
nico