Lire une ligne précise d'un .txt
Soyez le premier à donner votre avis sur cette source.
Snippet vu 8 520 fois - Téléchargée 36 fois
Contenu du snippet
Salut à tous je suis nouveau sur le réseau et ceci est un petit code pour lire une certaine ligne (précise) d'un fichier txt et l'afficher dans un label par exemple
J'ai mis ce code à dispo pour les débutants surtout alors ne m'assassinez pas si il y en a d'autres qui lui ressemblent car aucun n'était précis et commenté comme celui là (enfin je pense :) )a
Source / Exemple :
Open "C:/bidule.txt" For Input As #1 'ouvre le txt i = 0 'déclare i ki representera le numero de la ligne Do Until EOF(1) 'avant EOF (=la fin du fichier) : Line Input #1, texte 'on met la valeur texte = la ligne i = i + 1 'augmenter i de 1 ce ki symboliz la ligne 1 et au loop suivant la 2 etc... 'on lit la ligne 2 et non la 1 grace au code do until eof(1) If i = 2 Then Label1.Caption = texte: Close: Exit Sub 'si i = 2 donc ligne 2 alors on mark dans le label '------------------------------------------------------------------------ 'IL Y A DONC JUSTE A CHANGER LE NOM DU FICHIER ET LA VALEUR DE I DANS LA DERNIERE LIGNE DE CODE ci dessus '-------------------------------------------------------------------------- Loop 'recomencer
Conclusion :
J'ai mis ce code à dispo pour les débutants surtout alors ne m'assassinez pas si il y en a d'autres qui lui ressemblent car aucun n'était précis et commenté comme celui là (enfin je pense :) )a
A voir également
- Lire une ligne précise d'un .txt
- Modifier des lignes précises d'un txt ✓ - Forum - VB.NET
- Lire une ligne précise dans un textbox ✓ - Forum - Visual Basic 6
- Lire une ligne d'un fichier txt ✓ - Forum - C / C++ / C++.NET
- Copier une ligne précise dans un fichier .txt en VBscript ✓ - Forum - VB.NET
- Lire une ligne quelconque d'un fichier *.txt ✓ - Forum - Visual Basic
Certains on peut être la prétention de juger ce petit bout de code come une plaisenterie mais je pense qu'ils ont oublié qu'ils ont commencé avec rien comme tout le monde !
En ce qui me concerne, je débute et ce genre de petite astuce me sert à apprendre, a comprendre certains mecanismes et à me "faire les dents".
Ces petits bouts de codes en apparence naîve sont de surcroît très bien commentés. Alors s'il vous plaît messieurs les programmateurs confirmés ne découragez pas des membres comme Elenwa_Luva. Gardez vos commentaires scabreux qui ne font que polluer les forums !
Merci.
merci pour le code bouv
- Messages postés
-
1411
- Date d'inscription
- mercredi 6 août 2003
- Statut
- Membre
- Dernière intervention
- 3 mars 2019
1Puis
Dim i As Integer
Dim Temp As String
Open MonFichier For Input as #1
Do While Not EOF(1)
i = i + 1
LineInput #1, Temp
MaTextBox(i).Text = Temp
Loop
Close #1
Bonne prog
++
mon probleme à moi est que je voudrais tester un fichier texte contenant plusieurs données les unes en dessous des autres afin de les afficher dans plusieurs txtbox.
par exemple ligne 1 = 12 je met la valeur 12 dans ma textbox1
ligne 2 =13 je met 13 dans la textbox2
et ainsi de suite
merci de votre attention
- Messages postés
-
1411
- Date d'inscription
- mercredi 6 août 2003
- Statut
- Membre
- Dernière intervention
- 3 mars 2019
1Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.