Schreiben in eine Textdatei

Článek
09/02/2008

Aktualisiert: November 2007

In dieser Lektion lernen Sie, wie Sie eine Zeichenfolge in eine Textdatei in Visual Basic mithilfe des My.Computer.FileSystem-Objekt schreiben können.

In der vorherigen Lektion, Abrufen der Namen von Dateien in einem Ordner, wurde die Erstellung einer Bildanzeigeanwendung beschrieben, mit der Bilder aus einem Ordner in einem Bildfeld angezeigt werden können. Im nächsten Schritt werden die Namen Ihrer Lieblingsbilder in einer Textdatei gespeichert.

Grundlagen zu Dateien

Bevor Sie in eine Textdatei schreiben, sollten Sie mit einigen Grundlagen vertraut sein. Das My-Objekt in Visual Basic macht die Arbeit mit Dateien leicht. Mithilfe des My.Computer.FileSystem-Objekt können Sie in die Dateien auf einem Computer schreiben.

Mit der My.Computer.FileSystem.WriteAllText-Methode können Sie eine Zeichenfolge in eine Textdatei schreiben. Wenn die Datei nicht vorhanden ist, wird sie von dieser Methode erstellt. Sie können angeben, dass Sie der Datei Text hinzufügen möchten, anstatt bestehenden Text zu überschreiben. Dazu müssen Sie True als append-Parameter übergeben.

Hinweis:
Unter Windows XP gibt es besondere Ordner mit den Bezeichnungen Eigene Dateien, Eigene Bilder und Eigene Musik. Unter Windows Vista entfällt das Wort "Eigene" in den Bezeichnungen. Sie heißen stattdessen Dateien, Bilder und Musik. In dieser Lektion kommen diese Ordner zum Einsatz. Der Code in dieser Lektion wird jedoch sowohl unter Windows XP als auch unter Windows Vista ausgeführt.

Übung

So fügen Sie einer Textdatei Text hinzu

Öffnen Sie das Bildanzeige-Projekt aus der vorherigen Lektion. Wenn Sie die Lektion noch nicht abgeschlossen haben, kehren Sie zu Abrufen der Namen von Dateien in einem Ordner zurück und beenden die Lektion, bevor Sie fortfahren.
Wählen Sie im Projektmappen-Explorer die Datei Form1.vb aus, und klicken Sie dann im Menü Ansicht auf Designer.
Fügen Sie dem Formular neben der Schaltfläche Bilder laden ein Button-Steuerelement hinzu, und nennen Sie es FavoritesAdd.
Ändern Sie die folgenden Eigenschaften dieser Schaltfläche:

Eigenschaft

Wert

Text

Zu Favoriten hinzufügen

Größe

92, 23
Doppelklicken Sie auf die Schaltfläche Zu Favoriten hinzufügen, und fügen Sie dem FavoritesAdd_Click-Ereignishandler den folgenden Code hinzu. Dieser Code fügt der Datei FavoritePictures.txt den im Listenfeld ausgewählten Text hinzu.
```
If PictureBox1.ImageLocation <> "" Then

    ' Add the selected picture to the favorites text file.
    My.Computer.FileSystem.WriteAllText(FavoritePictures, _
        Me.ListBox1.SelectedItem & ",", True)

End If
```
Fügen Sie den folgenden Code über dem FavoritesAdd_Click-Ereignishandler ein. In diesem Code werden der Pfad und der Dateiname für die FavoritePictures-Variable definiert.
```
Dim FavoritePictures As String = _
    My.Computer.FileSystem.SpecialDirectories.MyDocuments _
    & "\FavoritePictures.txt"
```
Drücken Sie F5, um den Code auszuführen.
Klicken Sie auf Bilder laden, und klicken Sie in der Liste auf Ihr Lieblingsbild.
Klicken Sie auf Zu Favoriten hinzufügen.
Öffnen Sie die im Ordner Dateien gespeicherte Datei FavoritePictures.txt zum Überprüfen, ob der Name des Bilds an die Datei angefügt wurde.

Eigenschaft	Wert
Text	Zu Favoriten hinzufügen
Größe	92, 23

Nächste Schritte

In dieser Lektion haben Sie gelernt, wie Text an eine Textdatei angefügt wird. In der nächsten Lektion erfahren Sie, wie Text aus einer Textdatei gelesen wird.

Nächste Lektion: Lesen aus einer Textdatei