Freigeben über


Print #-Anweisung

Schreibt anzeigeformatierte Daten in eine sequenzielle Datei.

Syntax

Drucken#filenumber, [ outputlist ]

Die Syntax der Print #-Anweisung umfasst die folgenden Komponenten:

Komponente Beschreibung
filenumber Erforderlich. Eine gültige Dateinummer.
outputlist Optional. Ausdruck oder Liste von Ausdrücken, der/die zu drucken sind.

Einstellungen

Die Einstellungen des outputlist-Arguments sind:

[{ Spc(n) | Tab [ (n) ]}] [ expression ] [ charpos ]

Einstellung Beschreibung
Spc(n) Zum Einfügen von Leerzeichen in die Ausgabe, wobei n für die Anzahl der einzufügenden Leerzeichen steht.
Tab(n) Zum Positionieren der Einfügemarke in einer absoluten Spaltennummer, wobei n die Spaltennummer ist. Mit Tab ohne Argument können Sie die Einfügemarke an den Anfang der nächsten Druckzone setzen.
expression Zu druckende numerische Ausdrücke oder Zeichenfolgenausdrücke.
charpos Gibt den Einfügepunkt für das nächste Zeichen an. Verwenden Sie ein Semikolon, um die Einfügemarke unmittelbar hinter dem letzten Zeichen zu positionieren. Verwenden Sie Tab(n), um die Einfügemarke in einer absoluten Spaltennummer zu positionieren. Verwenden Sie Tab ohne Argument, um die Einfügemarke am Anfang der nächsten Druckzone zu positionieren. Wenn charpos ausgelassen wird, wird das nächste Zeichen in der nächsten Zeile gedruckt.

Hinweise

Mit Print # geschriebene Daten werden in der Regel von einer Datei mit Line Input # oder Input # gelesen.

Wenn Sie die outputlist auslassen und nur ein Listentrennzeichen nach der filenumber einfügen, wird in der Datei eine leere Zeile ausgegeben.

Mehrere Ausdrücke können mit einem Leerzeichen oder einem Semikolon getrennt werden. Ein Leerzeichen hat dieselbe Wirkung wie ein Semikolon.

Für Boolesche Daten wird entweder True oder False ausgegeben. Die Schlüsselwörter True und False werden nicht übersetzt, unabhängig vom Gebietsschema.

Datums-Daten werden mit dem standardmäßigen kurzen Datumsformat, das vom System erkannt wird, geschrieben. Wenn entweder die Datums- oder die Zeitkomponente fehlt oder 0 (null) ist, wird nur der bereitgestellte Teil in die Datei geschrieben.

Es wird nichts in die Datei geschrieben, wenn die Daten der outputlistleer sind. Wenn für die outputlist-Daten jedoch Null angegeben ist, wird Null in die Datei geschrieben.

Für Fehlerdaten wird die Ausgabe als ErrorFehlercode angezeigt. Das Schlüsselwort Error wird unabhängig vom Gebietsschema nicht übersetzt.

Die mit Print # in die Datei geschriebenen Daten sind international, d. h. die Daten werden mit dem jeweils passenden Dezimaltrennzeichen richtig formatiert.

Da Print # ein Bild der Daten in die Datei schreibt, müssen Sie die Daten so voneinander trennen, dass sie korrekt ausgegeben werden. Wenn Sie Tab ohne Argumente verwenden, um die Druckposition in die nächste Druckzone zu verschieben, schreibt Print # auch die Leerzeichen zwischen den Druckfeldern in die Datei.

Hinweis

Wenn Sie in der Zukunft die Daten aus einer Datei mit der Input #-Anweisung lesen möchten, verwenden Sie die Write #-Anweisung anstelle der Print #-Anweisung. Mit Write # wird die Integrität der einzelnen Datenfelder sichergestellt, indem sie ordnungsgemäß getrennt werden, damit sie mit Input # wieder eingelesen werden können. Mit Write # auch wird sichergestellt, dass sie in jedem Gebietsschema richtig gelesen werden können.

Beispiel

Im folgenden Beispiel werden Daten mit der Print #-Anweisung in eine Datei geschrieben.

Open "TESTFILE" For Output As #1 ' Open file for output. 
Print #1, "This is a test" ' Print text to file. 
Print #1, ' Print blank line to file. 
Print #1, "Zone 1"; Tab ; "Zone 2" ' Print in two print zones. 
Print #1, "Hello" ; " " ; "World" ' Separate strings with space. 
Print #1, Spc(5) ; "5 leading spaces " ' Print five leading spaces. 
Print #1, Tab(10) ; "Hello" ' Print word at column 10. 
 
' Assign Boolean, Date, Null and Error values. 
Dim MyBool, MyDate, MyNull, MyError 
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null 
MyError = CVErr(32767) 
' True, False, Null, and Error are translated using locale settings of 
' your system. Date literals are written using standard short date 
' format. 
Print #1, MyBool ; " is a Boolean value" 
Print #1, MyDate ; " is a date" 
Print #1, MyNull ; " is a null value" 
Print #1, MyError ; " is an error value" 
Close #1 ' Close file. 

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.