Anweisung Write#

Schreibt Daten in eine sequentielle Textdatei mit Trennzeichen.

Die Anweisung Print# verwenden, um Daten in eine sequentielle Textdatei zu drucken. Die Anweisung Put# verwenden, 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 durch Kommata getrennt in eine Datei eingegeben werden sollen.

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.

Eingegebenen Zeichenfolgen werden in Anführungszeichen eingeschlossen und durch Kommata getrennt. Diese Trennzeichen brauchen also nicht in die Ausdrucksliste eingegeben werden.

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