Recherche texte

Résolu
petiflamand
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
- 13 oct. 2005 à 22:54
petiflamand
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
- 14 oct. 2005 à 07:45
Voila
j'ai 503 ligne dans un fichier txt
dison qu'il y en a 50 avec le mot bonjour
je voudrais qu'il me donne uniquement c'est 50 phrase
Merci
Ps: je suis en VB5

2 réponses

promethee2003
Messages postés
38
Date d'inscription
lundi 8 novembre 2004
Statut
Membre
Dernière intervention
10 décembre 2006

14 oct. 2005 à 04:39
salut
essai ça (ca ajoute chaque ligne contenant bonjour dans une listbox):

Dim MyString as String
Open "fichier.txt" for input as #1
Do While Not EOF(1)
Input #1, MyString
if instr(1,Mystring,"bonjour") then list1.additem (MyString)
Loop
close #1
3
petiflamand
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
1
14 oct. 2005 à 07:45
Merci
0