Die Funktionen "Write" und "WriteLine"
Aktualisiert: November 2007
Schreibt Daten in eine sequenzielle Datei. Daten, die mit Write geschrieben worden sind, werden normalerweise mit Input-aus der Datei gelesen.
Public Sub Write( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output As Object _
)
' -or-
Public Sub WriteLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
Parameter
FileNumber
Erforderlich. Ein Integer-Ausdruck mit einer beliebigen gültigen Dateinummer.Output
Optional. Mindestens ein durch Komma getrennter Ausdruck, der in eine Datei geschrieben wird.
Ausnahmen
Ausnahmetyp |
Fehlernummer |
Bedingung |
|---|---|---|
FileNumber ist nicht vorhanden. |
||
Dateimodus ist ungültig. |
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 Write-Funktion und die WriteLine-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.
Wenn Output nicht angegeben wird, wird in der Datei eine Leerzeile ausgegeben. Mehrere Ausdrücke können durch Komma getrennt werden.
Im Gegensatz zur Print-Funktion fügt die Write-Funktion beim Schreiben in die Datei Kommas zwischen Elementen und Anführungszeichen um die Zeichenfolgen ein. Sie brauchen daher in der Liste kein explizites Trennzeichen anzugeben. Wenn mit Write Daten in eine Datei geschrieben werden, werden nur numerische, Boolean-, Datums-, NULL- und Error-Datenformate unterstützt. Es gelten die folgenden allgemeingültigen Annahmen, damit die Daten unabhängig von den Gebietsschemas stets mit Input gelesen und richtig interpretiert werden können:
Numerische Daten werden immer mit dem Punkt als Dezimaltrennzeichen geschrieben.
Bei Boolean-Daten wird entweder #TRUE# oder #FALSE# ausgegeben. Das True-Schlüsselwort und das False-Schlüsselwort wird ungeachtet der Gebietsschemas nicht übersetzt.
Datumsangaben werden im universellen Datumsformat in die Datei geschrieben. 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. Bei Daten mit Nullwert wird jedoch #NULL# geschrieben.
Wenn die Daten den Wert Error haben, wird #ERROR errorcode# ausgegeben. Das Schlüsselwort Error wird, unabhängig vom Gebietsschema, nicht übersetzt.
WriteLine fügt ein Zeilenumbruchzeichen, d. h. eine Kombination aus Wagenrücklauf und Zeilenvorschub oder Chr(13) + Chr(10), ein, nachdem das letzte Zeichen aus Output in die Datei geschrieben wurde.
Sie können Anführungszeichen in eine Zeichenfolge einbetten, indem Sie doppelte Anführungszeichen verwenden, also "". Beispiel:
Dim x As String = "Double quotation marks aren't ""difficult"" to handle."
Gibt eine Zeichenfolge mit dem Wert Double quotation marks aren't "difficult" to handle zurück.
Um Daten mit der Write-Funktion oder der WriteLine-Funktion in eine Datei zu schreiben, wird Append-Zugriff von der FileIOPermissionAccess-Enumeration benötigt. Weitere Informationen finden Sie unter FileIOPermissionAccess-Enumeration.
Beispiel
In diesem Beispiel werden mit der Write-Funktion unformatierte Daten in eine sequenzielle Datei geschrieben.
FileOpen(1, "TESTFILE", OpenMode.Output) ' Open file for output.
Write(1, "This is a test.") ' Print text to file.
WriteLine(1) ' Print blank line to file.
WriteLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
WriteLine(1, "Hello", " ", "World") ' Separate strings with space.
WriteLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
WriteLine(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.
WriteLine(1, aBool, " is a Boolean value")
WriteLine(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 "Print" und "PrintLine"