Recherche d'une chaine de caracteres dans une listbox ???

Question

Salut a tous,
J'ai besoin de votre aide :
J'ai un ListBox avec des lignes de type :

CM2---A1---058---Manuel_Jean
CM1---B2---144---Petit_Alain
CP---V6---009---Durant_Pascal
...

Je souhaiterai, apres recherche de la chaine de caracteres "144", arriver a extraire la ligne comportant ce nombre "144".

Exemple : dans une textbox1 ecrire 144, appuyer sur un bouton pour lancer la recherche et que s'inscrive dans ma textbox2 la ligne : CM1---B2---144---Petit_Alain de ma listbox.

Savez vous comment faire ?

cs_yannn · Answer

J'ai oubli&#233; de vous dire ... je suis sous VB5

jpleroisse · Answer

Voila une m&#233;thode.
Private Sub Command1_Click()
If Text1.Text = 144 Then
Text2.Text = List1.List(1) ' List1.List(1) correspond &#224; la 2&#232;me entr&#233;e dans la liste.
End If
End Sub

jpleroisse

cs_yannn · Answer

Non... moi c'ets l'inverse qu'il me faut :
Ma variable serait le nombre 144 :
En fait, je fais un programme pour classer les participants a un cross :

CM2---A1---058---Manuel_Jean

correspond a un eleve de CM2 de la classe A1 avec le dossard N&#176; 58 s'appelant Manuel Jean.

Ainsi, en fonction de l'arriv&#233;e des eleves, pour faire leur classement, j'aimerai juste avoir a entrer leur N&#176; de dossard pour avoir le reste des informations : Niveau---Classe---Dossard---Nom_Prenom

Gobillot · Answer

Dim i As Integer
    
    For i = 0 To List1.ListCount - 1
        If InStr(List1.List(i), Text1.Text) > 0 Then
           Text2.Text = List1.List(i)
           Exit For
           End If
        Next

Daniel

cs_yannn · Answer

Voila ... apres avoir fait travailler mes m&#233;ninges ... et dieu sait que c'est dur de les mettre en marche ! voila la solution :

For i = 0 To List1.ListCount - 1 'list1= liste dans laquelle on fait la recherche
List1.ListIndex = i
If InStr(List1, Text7) <> 0 Then MsgBox List1.ListIndex + 1 'Text7 = chaine de caracteres a rechercher
Next i

cs_yannn · Answer

Grand Merci Daniel !!!
Je venais de trouver ... mais ton code est beacoup plus joli que le mien !

VisualBoinet · Answer

Met le en r&#233;solu stp yannn si c'est bon alors :)

Marci

Recherche d'une chaine de caracteres dans une listbox ???

7 réponses

Discussions similaires