<< Click to Display Table of Contents >> Write # (Anweisung)

Write #Dateinummer, [Ausdruck]

Schreibt Daten in eine Datei.

Die Datei muss vorher mittels einer Open-Anweisung im Output- oder Append-Modus geöffnet worden sein.

Dateinummer ist die in der Open-Anweisung vergebene Nummer für die Datei.

Ausdruck enthält ein oder mehrere Ausgabeelemente.

Wenn Ausdruck weggelassen wird, wird eine Leerzeile ausgegeben. Beachten Sie, dass in diesem Fall trotzdem ein Komma geschrieben werden muss.

Siehe auch: Open, Seek, Print #

Beispiel:

Sub Main

 Open "TESTFILE" For Output As #1   ' Datei anlegen

 userData1$ = InputBox("Geben Sie eine Zeile Text ein.")

 userData2$ = InputBox("Geben Sie eine weitere Zeile ein.")

 Write #1, userData1, userData2     ' Daten schreiben

 Close #1

 Open "TESTFILE" for Input As #2    ' Datei öffnen

 Print "Inhalt der Datei:"

 Do While Not EOF(2)

         Line Input #2, FileData        ' Zeile einlesen

         Print FileData

 Loop

 Close #2                           ' Datei schließen

 Kill "TESTFILE"                    ' Datei löschen

End Sub