[VB.NET] Ecrire à la ligne dans un fichier
spbr
-
tictac08 Messages postés 18 Date d'inscription Statut Membre Dernière intervention -
tictac08 Messages postés 18 Date d'inscription Statut Membre Dernière intervention -
Salut à tous, je cherche à écrire du texte en plusieurs lignes dans un fichier, seulement avec le code que j'ai le programme ajoute le texte à la suite :
If MonFichier.CanWrite Then
Dim Contenu(NbCar) As Byte
Dim Compteur As Integer = 0
For Each Lettre As Char In Me.TXT_Cle.Text.ToCharArray
Contenu(Compteur) = Asc(Lettre)
Compteur += 1
Next
MonFichier.Write(Contenu, 0, Compteur)
End If
If MonFichier.CanWrite Then
Dim Contenu(NbCar) As Byte
Dim Compteur As Integer = 0
For Each Lettre As Char In Me.TXT_Cle.Text.ToCharArray
Contenu(Compteur) = Asc(Lettre)
Compteur += 1
Next
MonFichier.Write(Contenu, 0, Compteur)
End If
A voir également:
- [VB.NET] Ecrire à la ligne dans un fichier
- Comment réduire la taille d'un fichier - Guide
- Fichier bin - Guide
- Comment ouvrir un fichier epub ? - Guide
- Fichier rar - Guide
- Forcer la suppression d'un fichier - Guide
1 réponse
If MonFichier.CanWrite Then Dim Contenu(NbCar) As Byte Dim Compteur As Integer = 0 For Each Lettre As Char In Me.TXT_Cle.Text.ToCharArray Contenu(Compteur) = Asc(Lettre) Compteur += 1 Next MonFichier.Write(Contenu, 0, Compteur) End If
Je ne comprends pas trop l'utilisation de "Dim contenu(Nbchar) as byte"...ni d'ailleur la ligne qui suit
Perso utilise juste sa
For Each Lettre As Char In Me.TXT_Cle.Text.ToCharArray IO.File.AppendAllText("Chemin de ton fichier", Lettre & vbNewLine) Next
Un seul truc, si le fichier existe déjà, cela se rajoute encore en bas