Anweisung Print

Gibt die angegebenen Zeichenketten oder numerischen Ausdrücke in einen Dialog oder eine Datei aus.

Syntax:

Print [#Dateiname,] Ausdruck1[{;|,} [Spc(Zahl As Integer);] [Tab(Position As Integer);] [Ausdruck2[...]]

Parameter:

Dateiname: Ein beliebiger numerischer Ausdruck, der die von der Anweisung Open für die jeweilige Datei gesetzte Dateinummer enthält.

Ausdruck: Ein beliebiger auszugebender numerischer oder Zeichenkettenausdruck. Mehrere Ausdrücke können durch Strichpunkte getrennt angegeben werden. Wird ein Komma als Trennzeichen verwendet, so werden die Ausdrücke zum nächsten Tabulator eingerückt. Die Tabulatorpositionen können nicht geändert werden.

Zahl: Die Anzahl von Leerzeichen, die die Funktion Spc einfügen soll.

Position: Es werden bis zur angegebenen Position Leerzeichen eingefügt.

Steht hinter dem letzten auszugebenden Ausdruck entweder ein Semikolon oder ein Komma, dann merkt sich Collabora Office Basic zunächst den auszugebenden Text in einem internen Speicher und fährt mit der Ausführung der folgenden Anweisung fort, ohne dass etwas gedruckt wird. Erst wenn ein Print-Befehl erreicht wird, der mit keinem der beiden Zeichen endet, werden alle bis dorthin gemerkten Ausdrücke dargestellt.

Bei der Ausgabe von positiven numerischen Ausdrücken wird ein Leerzeichen quasi als imaginäres Plus-Zeichen vorangestellt. Negative Ausdrücke werden mit vorgestelltem Minuszeichen ausgegeben. Wird bei Fließkommawerten ein bestimmter Bereich überschritten, wird der jeweilige numerische Ausdruck in der Exponentialschreibweise ausgegeben.

Sollte der auszugebende Ausdruck eine bestimmte Länge überschreiten, wird die Darstellung automatisch in die nächste Zeile umgebrochen.

Sie können die Funktion Tab mit Semikolon getrennt zwischen Argumente stellen, um die Ausgabeposition bis zu einer bestimmten Stelle zu rücken, oder die Funktion Spc verwenden, um eine entsprechende Anzahl von Leerzeichen einzufügen.

Beispiel:

Sub ExamplePrint
    Print "ABC"
    Print "ABC","123"
    i = FreeFile()
    Open "C:\Temp.txt" For Output As i
    Print #i, "ABC"
    Close #i
End Sub

Sub ExamplePrint
    Print "ABC"
    Print "ABC","123"
    i = FreeFile()
    Open "~/temp.txt" For Output As i
    Print #i, "ABC"
    Close #i
End Sub