Dans un fichier texte chercher une chaine avant un caractere"|"

cs_rober Messages postés 86 Date d'inscription vendredi 29 novembre 2002 Statut Membre Dernière intervention 21 septembre 2010 - 12 oct. 2006 à 21:38
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 12 oct. 2006 à 23:37
Rober
Bonsoir,
je voudrais extraire ,sur chaque ligne d'un fichier texte et en partant de la gauche, la chaine de caractere qui est avant le caractere"|" et ensuite envoyer ces chaines dans un listbox qui les envera vers un combobox pour avoir une liste deroulante de choix.

Pour faire clair:
dans un fichier txt j'ai
ROGER|c:\cao
MOI|c:\mes photos.....

je voudrais recuperer
ROGER   l'ajouter à un listbox puis à un combobox
puis
MOI         l'ajouter à un listbox puis à un combobox

Merci de votre aide

2 réponses

Dolphin Boy Messages postés 630 Date d'inscription vendredi 5 mai 2006 Statut Membre Dernière intervention 17 février 2007
12 oct. 2006 à 21:55
Salut, tout ce que tu cherches est classique.
1 - lecture d'un fichier texte
   voir open ...
2 - extraction dans la chaine
   v = mid$(chaine, 1, instr(chaine, "|") - 1)
3 - listbox et combo
   voir méthode Add et Additem

Tout ça c'est sur le site, cherche un peu. Il y a un moteur de recherche en haut de la page.
0
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
12 oct. 2006 à 23:37
Salut
Mon petit grain de sel, lol
Tu peux aussi faire un Split :
Dim monTableau() As String
monTableau = Split(maChaine, "|")
et tu auras tes données dans :
1ere donnée : monTableau(0)   ' Index 0
Dernière : Index =UBound(monTableau)
Pratique si tu as aussi besoin des données qui suivent ton |
;-)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accroit quand on
0
Rejoignez-nous