Width #-Anweisung (Beispiel)

In diesem Beispiel wird die Width #-Anweisung verwendet, um die Breite einer Ausgabezeile für eine Datei festzulegen.

Dim I
Open "DATEI1" For Output As #1    ' Datei zur Ausgabe öffnen.
VBA.Width 1, 5    ' Zeilenbreite auf 5 festlegen.
For I = 0 To 9    ' 10 Schleifendurchläufe.
    Print #1, Chr(48 + I);    ' 5 Zeichen pro Zeile ausgeben.
Next I
Close #1    ' Datei schließen.