Comment écrire dans un fichier texte en VB. NET

L'écriture dans un fichier texte est similaire à la lecture d'un fichier texte. Encore une fois, nous utilisons System.IO. Cette fois, au lieu d'utiliser le StreamReader nous utilisons le StreamWriter. Le StreamWriter est utilisé pour écrire un flux de texte dans un fichier.
Ajouter un autre bouton au formulaire que vous avez travaillé. Définissez la propriété Text du bouton à "écrire dans le fichier". Double-cliquez sur votre nouveau bouton pour ouvrir la fenêtre de codage. Ajoutez les lignes suivantes:

FILE_NAME As String = "C: \ Users \ Propriétaire \ Documents \ test2.txt"

Si System.IO.File.Exists (FILE_NAME) = True Then

ObjWriter As New System.IO. StreamWriter (FILE_NAME)

objWriter. Write (TextBox1.Text)
objWriter. Close ()
MsgBox ("Texte écrit dans un fichier")

Else

MsgBox ("Le fichier n'existe pas")

End If

Exécutez votre programme, puis cliquez sur votre nouveau bouton.
Sauf si vous avez un fichier appelé "test2.txt", vous devriez voir l'affichage de la boîte de message: "Le fichier n'existe pas."
Encore une fois, VB insiste sur le fait que le fichier doit exister avant qu'il peut réellement faire quelque chose avec elle. Ce qui n'est pas déraisonnable!
Arrêtez votre programme et modifier cette ligne:

FILE_NAME As String = "C: \ Users \ Propriétaire \ Documents \ test2.txt"

Pour cela:

FILE_NAME As String = "C: \ Users \ Propriétaire \ Documents \ test.txt"

En d'autres termes, il suffit de changer le nom du dossier à test.txt. (J'espère que vous n'avez pas supprimé le fichier test.txt de votre disque dur!)
Lancez votre programme. Tapez quelque chose dans la zone de texte, puis cliquez sur le bouton. Vous devriez voir la boîte de message "texte écrit dans un fichier" apparaît.
Mais notez que si vous ouvrez le fichier texte lui-même, n'importe quel texte que vous aviez précédemment aura disparu - il a été remplacé, plutôt que des ajouts. (Nous allons voir comment ajouter du texte dans un fichier sous peu.)
Jetons un oeil au code que nous avons écrit, cependant.
Encore une fois, nous vérifions pour voir si le fichier existe. S'il est vrai que le fichier existe, alors la première ligne exécutée est de mettre en place notre variable:

ObjWriter As New System.IO.StreamWriter (FILE_NAME)

C'est presque la même chose que la dernière fois . Seules deux choses ont changé: nous avons créé un nouveau nom de variable, objWriter, et nous sommes maintenant en utilisant StreamWriter au lieu de StreamReader. Tout le reste est le même.
Pour écrire le texte de notre dossier, nous avons utilisé ceci:

objWriter.Write (TextBox1.Text)

Après le nom de notre variable (objWriter), nous avons tapé un arrêt complet. Le menu déroulant apparaît montrant les propriétés et les méthodes disponibles. La méthode "Write" a été choisi dans la liste. Entre parenthèses, vous mettez ce que vous voulez VB pour écrire à votre fichier texte. Dans notre cas, c'était ce texte dans Textbox1. Vous pouvez également faire ceci:

objWriter.Write ("votre texte ici")

Le texte ci-dessus utilise directement entouré de guillemets. Ceci est également acceptable:

TheText As String = "votre texte ici"

objWriter.Write (TheText)

Cette fois, nous avons mis le texte à l'intérieur d'une variable. Le nom de la variable est ensuite tapé à l'intérieur des parenthèses de "Write".
Mais vous n'avez pas à écrire tout le texte à la fois. Vous pouvez écrire ligne par ligne. Dans ce cas, sélectionnez WriteLine des propriétés et méthodes disponibles. Voici un exemple de la façon d'utiliser WriteLine:

FILE_NAME As String = "C: \ Users \ Propriétaire \ Documents \ test.txt"
I As Integer
Dim aryText (4) As String

aryText (0) = "Mary WriteLine"
aryText (1) = "avaient"
aryText (2) = "A"
aryText (3) = "Petite"
aryText (4) = "One"

ObjWriter As New System.IO. StreamWriter (FILE_NAME)

For i = 0 à 4

objWriter. WriteLine (aryText (i))

Suivant

objWriter.Close ()

La vérification d'erreur code a été laissé de côté ici. Mais remarquez la nouvelle façon d'écrire du texte dans le fichier:

objWriter.WriteLine (aryText (i))

Nous sommes en boucle ronde et écrire le contenu d'un tableau. Chaque ligne de texte à partir du tableau sont écrites sur notre fichier texte. Mais chaque ligne est annexé. Autrement dit, le fichier texte ne soit pas effacée après chaque ligne a été écrit. Toutes les lignes de la matrice seront écrits dans le fichier texte. Toutefois, si vous deviez exécuter le code une deuxième fois puis le contenu du fichier sont effacés avant la nouvelle WriteLine () entre en action. En d'autres termes, vous feriez seulement obtenir une version de "Mary WriteLine avait un peu un" lieu de deux.
Dans la partie suivante, nous verrons comment ajouter du texte à un fichier qui contient déjà du texte - appelé ajout dans un fichier.

Posted in: Visual Basic .NET