Discussion :

[jacko842]

Bonjour quand je clik sur le 1 er element de ma listbox je voudrais qu il me renvois un message coucou mais le probleme et le suivant c est qu il me met erreur d'execution 13 type incompatible

voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If List1.List(0) Then MsgBox "coucou"

merci

[jacko842]

Si je fais If List1.select(0) Then MsgBox "coucou" la ca fonctionne en faite je voudrais savoir selectionné une phrase dans ma liste box et la mettre dans une variable

[jacko842]

ok j ai trouvé str_phrase_selec = List1.List(List1.ListIndex)

[Vld44]

Ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If List1.List(0) Then ...

ne veut rien dire, SAUF si les éléments de ta liste sont des booléens (true/false, pas 0/1)

Ce qu'il y a entre if et then est une condition logique qui est testée sur la base d'un vrai ou faux.

Hors, visiblement, tu stockes des chaînes de charactères qui n'ont rien avoir ... (pour mémoire VB est très permissif et ce que tu as écrit revient à dire If List1.List(0) = true Then, tu comprends donc le problème !)