Lire une ligne presise dans un txt

cs_Moria Messages postés 31 Date d'inscription lundi 29 juillet 2002 Statut Membre Dernière intervention 12 septembre 2002 - 29 juil. 2002 à 18:07
druggedsephiroth Messages postés 71 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 19 juin 2003 - 29 juil. 2002 à 18:50
Slt,

comment faire pour lire un ligne presise d'un txt...
Un numero de ligne k je specifie
Il y a 6 lignes dans le txt

@+

1 réponse

druggedsephiroth Messages postés 71 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 19 juin 2003 1
29 juil. 2002 à 18:50
Ya surement plus simple mais tu peux faire comme ca:

Private Sub Command1_Click()
Open "fichier.txt" For Input As #1
While Not EOF(1)
Line Input #1, variable
i = i + 1
If i = 3 Then GoTo suite 'remplace le 3 par la ligne que tu veux avoir
Wend
suite:
MsgBox variable
End Sub

Private Sub Form_Load()
i = 1
End Sub
0
Rejoignez-nous