FileWidth-Funktion

Artikel
09/02/2008

Aktualisiert: November 2007

Legt die Breite einer Ausgabezeile für eine mit der FileOpen-Funktion geöffnete Datei fest.

Public Sub FileWidth( _
      FileNumber As Integer, _
      RecordWidth As Integer _
)

Parameter

FileNumber
Erforderlich. Beliebige gültige Dateinummer.
RecordWidth
Erforderlich. Numerischer Ausdruck im Bereich von 0 bis einschließlich 255, der die Anzahl der Zeichen festlegt, die eine Zeile aufnehmen kann, bevor sie auf eine neue Zeile umbrochen wird. Wenn RecordWidth gleich 0 (null) ist, gibt es keine Längenbeschränkung für eine Zeile. Der Standardwert von RecordWidth ist 0.

Ausnahmen

Ausnahmetyp	Fehlernummer	Bedingung
IOException	52	FileNumber ist nicht vorhanden.
IOException	54	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

Diese Funktion legt die Breite einer Ausgabezeile für eine mit der FileOpen-Funktion geöffnete Datei fest.

Beispiel

In diesem Beispiel wird mit der FileWidth-Funktion die Breite einer Ausgabezeile für eine Datei festgelegt.

Dim i As Integer
FileOpen(1, "TESTFILE", OpenMode.Output) ' Open file for output.
FileWidth(1, 5)   ' Set output line width to 5.
For i = 0 To 9   ' Loop 10 times.
   Print(1, Chr(48 + I))   ' Prints five characters per line.
Next
FileClose(1)   ' Close file.