Die Funktionen "Print" und "PrintLine"
Aktualisiert: November 2007
Schreibt Daten, die für die Ausgabe formatiert sind, in eine sequenzielle Datei.
Public Sub Print( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
' -or-
Public Sub PrintLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
Parameter
FileNumber
Erforderlich. Beliebige gültige Dateinummer.Output
Optional. 0 (null) oder mehrere durch Komma getrennte Ausdrücke, die in eine Datei geschrieben werden.Die Einstellungen für das Output-Argument sind:
Einstellung |
Beschreibung |
|---|---|
SPC(n) |
Fügt Leerzeichen in die Ausgabe ein. n ist die Anzahl der einzufügenden Leerzeichen. |
TAB(n) |
Positioniert die Einfügemarke in einer absoluten Spaltennummer, die durch n angegeben wird. TAB ohne Argument positioniert die Einfügemarke am Anfang des nächsten Druckbereichs. |
expression |
Numerische Ausdrücke oder Zeichenfolgenausdrücke, die ausgegeben werden sollen. |
Ausnahmen
Ausnahmetyp |
Fehlernummer |
Bedingung |
|---|---|---|
Dateimodus ist ungültig. |
||
FileNumber ist nicht vorhanden. |
Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlersteuerung durch eine Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.
Hinweise
Die Print-Funktion und die PrintLine-Funktion werden für die Abwärtskompatibilität bereitgestellt und haben möglicherweise Auswirkungen auf die Leistung. Wenn es sich nicht um Legacyanwendungen handelt, bietet das My.Computer.FileSystem-Objekt eine bessere Leistung. Weitere Informationen finden Sie unter Dateizugriff mit Visual Basic.
Print fügt keinen Zeilenvorschub am Ende einer Zeile ein; PrintLine dagegen fügt einen Zeilenvorschub ein.
Daten, die mit Print geschrieben worden sind, werden normalerweise mit LineInput oder Input aus einer Datei gelesen.
Wenn Sie Output für PrintLine nicht angeben, wird eine Leerzeile in die Datei ausgegeben; bei Print erfolgt keine Ausgabe. Mehrere durch Komma getrennte Ausdrücke werden an Tabulatorbegrenzungen ausgerichtet. Allerdings kann es zu inkonsistenten Ergebnissen führen, wenn Kommas und TAB gemischt werden.
Bei Boolean-Daten wird entweder True oder False ausgegeben. Das True-Schlüsselwort und das False-Schlüsselwort werden ungeachtet des Gebietsschemas nicht übersetzt.
Datumsangaben werden in dem Format in die Datei geschrieben, das als kurzes Datums- und Zeitformat für Ihr System eingestellt ist. Fehlt entweder die Datums- oder die Zeitangabe, oder ist sie gleich Null, so wird nur der vorhandene Teil in die Datei geschrieben.
In die Datei wird nichts ausgegeben, wenn keine Output-Daten vorhanden sind. Wenn die Output-Listendaten jedoch DBNull sind, wird Null in die Datei geschrieben.
Wenn die Daten den Wert Error haben, wird Error errorcode ausgegeben. Das Error-Schlüsselwort wird ungeachtet des Gebietsschemas nicht übersetzt.
Wenn Daten mit Print in eine Datei geschrieben werden, werden sie korrekt unter Verwendung der Dezimaltrennzeichen des jeweiligen Gebietsschemas formatiert. Wenn die Daten für die Verwendung entsprechend mehreren Gebietsschemas ausgegeben werden sollen, sollten sie mit Write geschrieben werden.
Um Daten mit der Print-Funktion oder der PrintLine-Funktion in eine Datei zu schreiben, wird Write-Zugriff von der FileIOPermissionAccess-Enumeration benötigt. Weitere Informationen finden Sie unter FileIOPermissionAccess-Enumeration.
Beispiel
In diesem Beispiel werden mit den Funktionen Print und PrintLine Daten in eine Datei geschrieben.
FileOpen(1, "c:\trash.txt", OpenMode.Output) ' Open file for output.
Print(1, "This is a test.") ' Print text to file.
PrintLine(1) ' Print blank line to file.
PrintLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
PrintLine(1, "Hello", "World") ' Separate strings with a tab.
PrintLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
PrintLine(1, TAB(10), "Hello") ' Print word at column 10.
' Assign Boolean, Date, and Error values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")
' Dates and booleans are translated using locale settings of your system.
PrintLine(1, aBool, " is a Boolean value")
PrintLine(1, aDate, " is a date")
FileClose(1) ' Close file.
Hinweise für Entwickler intelligenter Geräte
Diese Funktion wird nicht unterstützt.
Anforderungen
Namespace:Microsoft.VisualBasic
**Modul:**FileSystem
**Assembly:**Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)
Siehe auch
Aufgaben
Gewusst wie: Schreiben von Text in Dateien in Visual Basic
Gewusst wie: Schreiben von Text in Dateien mit einem Streamwriter in Visual Basic
Referenz
Die Funktionen "Write" und "WriteLine"