Anweisung Write#

Schreibt Daten in eine sequentielle Textdatei mit Trennzeichen.

Verwenden Sie die Anweisung Print#, um Daten in eine sequentielle Textdatei zu drucken. Verwenden Sie die Anweisung Put#, um Daten in eine Binärdatei oder eine Zufallsdatei zu schreiben.

Write [#fileNum] {,|;} expression [, …]

fileNum: Ein numerischer Ausdruck, der die Dateinummer enthält, die durch die Anweisung Open für die jeweilige Datei festgelegt wurde.

Liste Ausdruck: Variablen oder Ausdrücke, die Sie durch Kommata getrennt in eine Datei eingeben möchten.

Wird die Ausdrucksliste nicht mit angegeben, fügt die Anweisung Write der Datei eine Leerzeile hinzu.

Um eine Ausdrucksliste in eine neue oder bestehende Datei zu schreiben, muss die Datei im Modus Output oder Append geöffnet sein.

Von Ihnen eingegebenen Zeichenfolgen werden in Anführungszeichen eingeschlossen und durch Kommata getrennt. Sie brauchen diese Trennzeichen also nicht in die Ausdrucksliste einzugeben.

Als letzten Eintrag geben alle Anweisungen Write ein Symbol für Zeilenende aus.

Zahlen mit Dezimaltrennzeichen werden gemäß dem eingestellten Gebietsschema konvertiert.

Sub ExampleWrite
    Dim iCount As Integer
    Dim sValue As String
    iCount = Freefile
    Open "C:\Users\ThisUser\data.txt" For Output As iCount
    sValue = "Hamburg"
    Write #iCount,sValue,200
    sValue = "New York"
    Write #iCount,sValue,300
    sValue = "Miami"
    Write #iCount,sValue,450
    Close #iCount
End Sub

Sub ExampleWrite
    Dim iCount As Integer
    Dim sValue As String
    iCount = Freefile
    Open "~/data.txt" For Output As iCount
    sValue = "Hamburg"
    Write #iCount,sValue,200
    sValue = "New York"
    Write #iCount,sValue,300
    sValue = "Miami"
    Write #iCount,sValue,450
    Close #iCount
End Sub