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
Rejoignez-nous