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

Print #Dateinummer, [Ausdruck]

Gibt Daten in eine Datei aus.

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

Ausdruck enthält die auszugebenden Zeichen.

Wenn Ausdruck weggelassen wird, wird eine Leerzeile ausgegeben. Beachten Sie, dass in diesem Fall trotzdem das Komma benötigt wird (z.B. Print #1,).

Siehe auch: Open, Print, Seek, Write #

Beispiel:

Dieses Beispiel schreibt Daten in eine Testdatei und liest sie zurück.

Sub Main

 Dim FileData, Msg, NL

 NL = Chr(10)                     ' Chr(10)=Neue Zeile

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

 Print #1, "Dies ist ein Test der Print #-Anweisung"

 Print #1, "Zeile 2"

 Print #1, "Zeile 3"

 Close                            ' Alle Dateien schließen

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

 Do While Not EOF(2)

         Line Input #2, FileData      ' Zeile einlesen

         Msg = Msg & FileData & NL

         MsgBox Msg

 Loop

 Close                            ' Alle Dateien schließen

 Kill "TESTFILE"                  ' Datei löschen

End Sub