b6 comparaison d'une chaine ligne par ligne

Question

salut , je voudrait savoir comment comparer une chaine de caracetere.
1) le code doit ouvrir un fichier "toto.txt"
2) il doit lire la premiere ligne
3) retirer les infos que je souhaite (split)
4)  merttre ses infos ds des varibles et les conserver
5) comparer si les variable sont identique a chaque ligne.(lie ligne par ligne et comparer sur chaque ligne)
6) si c'est identique modifier copier la ligne et la modifier sinon passer ligne suivante.
7)fermer fichier

'variable
fic = "C:	oto.txt "
   Dim uiop As Integer
   uiop = FreeFile
     Open fic For Input As #uiop
     Line Input #uiop, st
     
     a = Split(st, ";")(0) 'demande le mot qui est en position 0
    b = Split(st, ";")(2)
    c = Split(st, ";")(4)
    i = Split(st, ";")(5)
    
jusqua la partie 4 aucun pb.
 le pb commence a la partie 5 je veux prendre les mots qui sont ds les variables et v&#233;rifier  (ou comparer)si c mot apparaissent ds les autres ligne  si c identique je modifie sinon je continue.

JB76000 · Answer

Fais une recherche dans les codes, tape "moteur de recherche", il y a des trucs biens ;)

Jer

B6 comparaison d'une chaine ligne par ligne

1 réponse

Discussions similaires