Lire une ligne presise dans un txt

Signaler
Messages postés
31
Date d'inscription
lundi 29 juillet 2002
Statut
Membre
Dernière intervention
12 septembre 2002
-
Messages postés
71
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
19 juin 2003
-
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

Messages postés
71
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
19 juin 2003

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