Regel instructie Input#
Leest een regel van een sequentieel bestand in een variabele.

Line Input #fileNum, variable
fileNum: Nummer van het bestand dat u wilt lezen. Het bestand moet al geopend zijn met de instructie Open met het sleutelwoord INPUT.
variable: De naam van de variabele met het resultaat.
Met de Line Input#-instructie kunt u tekenreeksen uit een geopend bestand in een variabele inlezen. Tekenreeksvariabelen worden regel na regel gelezen tot het eerste harde regeleinde (Asc: 13) of regeleinde (Asc: 10). Regeleinde-tekens worden niet opgenomen in de resulterende tekenreeks.
Sub ExampleWorkWithAFile
Dim iNumber As Integer
Dim sLine As String
Dim aFile As String
Dim sMsg As String
aFile = "C:\Users\ThisUser\data.txt"
iNumber = Freefile
Open aFile For Output As #iNumber
Print #iGetal, "Dit is een tekstregel"
Print #iGetal, "Dit is een andere tekstregel"
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
Sub ExampleWorkWithAFile
Dim iNumber As Integer
Dim sLine As String
Dim aFile As String
Dim sMsg As String
aFile = "~/data.txt"
iNumber = Freefile
Open aFile For Output As #iNumber
Print #iGetal, "Dit is een tekstregel"
Print #iGetal, "Dit is een andere tekstregel"
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