IBM Lotus Symphony


Line Input #-Anweisung [Laufzeit]

Liest Zeichenfolgen aus einer sequenziellen Datei in eine Variable.

Syntax:

Line Input #Dateinummer As Integer, Var As String

Parameter:

Dateinummer: Die Nummer der Datei, die die zu lesenden Daten enthält. Die Datei muss zuvor mit der Open-Anweisung mithilfe des Schlüsselworts INPUT geöffnet werden.

var: Der Name der Variablen, in der das Ergebnis gespeichert wird.

Mit der Line Input#-Anweisung können Sie Zeichenfolgen aus einer geöffneten Datei in eine Variable lesen. Zeichenfolgevariablen werden zeilenweise bis zum ersten Wagenrücklauf (Asc=13) oder Zeilenvorschub (Asc=10) gelesen. Zeilenendemarkierungen sind nicht in die Ergebniszeichenfolge eingeschlossen.

Beispiel:

Sub ExampleWorkWithAFile

Dim iNumber As Integer

Dim sLine As String

Dim aFile As String

Dim sMsg as String

aFile = "c:\data.txt"

iNumber = Freefile

Open aFile For Output As #iNumber

Print #iNumber, "Dies ist eine Textzeile"

Print #iNumber, "Dies ist eine weitere Textzeile"

Close #iNumber

iNumber = Freefile

Open aFile For Input As iNumber

While not eof(iNumber)

Line Input #iNumber, sLine

If sLine <>"" then

sMsg = sMsg & sLine & chr(13)

end if

wend

Close #iNumber

Msgbox sMsg

End Sub


Produktfeedback | Zusätzliche Dokumentation | Marken