[VB.Net] Lire fichier ligne par ligne
Fermé
Homer
-
5 mars 2010 à 18:55
Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 - 23 sept. 2013 à 19:05
Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 - 23 sept. 2013 à 19:05
A voir également:
- C++ lire fichier ligne par ligne
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Lire fichier epub - Guide
- Aller à la ligne excel - Guide
- Partager photos en ligne - Guide
- Site de vente en ligne particulier - Guide
5 réponses
Utilisateur anonyme
5 mars 2010 à 21:42
5 mars 2010 à 21:42
bonjour,
au debut du module
imports system.io
dans la procedure
dim nbr_lignes as integer=0
dim ligne as string
dim sr as new stream reader("chemin" )
while sr.peek<>-1
nbr_ligne+=1
ligne=sr.realine()
msgbox("la ligne" & nbr_ligne & ": " & ligne)
end while
msgbox("Nombre de ligne=" & nbr_ligne)
c'est pas testé, si ce code contient des erreurs mets moi au courant.
au debut du module
imports system.io
dans la procedure
dim nbr_lignes as integer=0
dim ligne as string
dim sr as new stream reader("chemin" )
while sr.peek<>-1
nbr_ligne+=1
ligne=sr.realine()
msgbox("la ligne" & nbr_ligne & ": " & ligne)
end while
msgbox("Nombre de ligne=" & nbr_ligne)
c'est pas testé, si ce code contient des erreurs mets moi au courant.
s3lkis
Messages postés
6
Date d'inscription
vendredi 5 mars 2010
Statut
Membre
Dernière intervention
18 février 2013
1
5 mars 2010 à 19:20
5 mars 2010 à 19:20
salut, un exemple ici : http://tresorsdevie.free.fr/selkis/index.php?option=com_content&view=article&id=80:lireecriretxt&catid=37:codes-sources&Itemid=72
lecture ligne a ligne ou d'un seul flux
a++
lecture ligne a ligne ou d'un seul flux
a++
Merci mais ce n'est pas trop ce que je cherche.
En fait, par exemple si mon fichier texte (C:\fichier.txt) contient :
J'aimerais que ça crée une variable de type string (ou de type array, mais je ne sais pas trop comment utiliser des tableaux en vb.net) pour chaque ligne, par exemple :
nbligne = 4
ligne1 = "bonjour"
ligne2 = "au revoir"
ligne3 = "salut"
ligne4 = "ça va?"
Sachant qu'il y a x ligne(s) (donc un nombre indéterminé de lignes)
Merci de votre aide.
En fait, par exemple si mon fichier texte (C:\fichier.txt) contient :
bonjour au revoir salut ça va?
J'aimerais que ça crée une variable de type string (ou de type array, mais je ne sais pas trop comment utiliser des tableaux en vb.net) pour chaque ligne, par exemple :
nbligne = 4
ligne1 = "bonjour"
ligne2 = "au revoir"
ligne3 = "salut"
ligne4 = "ça va?"
Sachant qu'il y a x ligne(s) (donc un nombre indéterminé de lignes)
Merci de votre aide.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Kalissi
Messages postés
218
Date d'inscription
jeudi 2 mai 2013
Statut
Membre
Dernière intervention
15 juillet 2019
20
23 sept. 2013 à 19:05
23 sept. 2013 à 19:05
Bonjour,
Exemple type :
p.s. si tu développe sous VB2008 ou +
la nouvelle déclaration de type Short, Integer et Long est :
Dim nbrLigne1 As Int16 ' Short
Dim nbrLigne2 As Int32 ' Integer
Dim nbrLigne As Int64 ' Long
K
Exemple type :
Private Function LectureLigne() As List(Of String)
Dim lstString As New List(Of String)
Dim ligne As String
Dim sr As New StreamReader("C:\test.txt")
While sr.Peek <> -1
ligne = sr.ReadLine()
lstString.Add(ligne)
MsgBox("la ligne" & lstString.Count - 1 & ": " & lstString(lstString.Count - 1))
End While
MsgBox("Nombre de ligne=" & lstString.Count)
Return lstString
End Function
p.s. si tu développe sous VB2008 ou +
la nouvelle déclaration de type Short, Integer et Long est :
Dim nbrLigne1 As Int16 ' Short
Dim nbrLigne2 As Int32 ' Integer
Dim nbrLigne As Int64 ' Long
K
6 mars 2010 à 22:09
Il y avait quelques erreurs.
Mais voilà le code corrigé :
Dim nbr_ligne As Integer = 0 Dim ligne As String Dim sr As New StreamReader("C:\test.txt") While sr.Peek <> -1 nbr_ligne += 1 ligne = sr.ReadLine() MsgBox("la ligne" & nbr_ligne & ": " & ligne) End While MsgBox("Nombre de ligne=" & nbr_ligne)