S Sadk Member Dec 27, 2021 #1 Dim InputData ' Open file for input. Open "MYFILE" For Input As #1 ' Check for end of file. Do While Not EOF(1) ' Read line of data. Line Input #1, InputData ' Print to the Immediate window. Debug.Print InputData Loop wend ' Close file. Close #1
Dim InputData ' Open file for input. Open "MYFILE" For Input As #1 ' Check for end of file. Do While Not EOF(1) ' Read line of data. Line Input #1, InputData ' Print to the Immediate window. Debug.Print InputData Loop wend ' Close file. Close #1
Erel B4X founder Staff member Licensed User Longtime User Dec 27, 2021 #2 B4X: Dim lines As List = File.ReadList(...) For Each line As String In lines Log(line) Next Upvote 0