Visual Basic .net
From ScienceZero
Graphics
Files
Reading text files line by line:
Dim f1 As Long
dim filestring as string
f1 = FreeFile()
FileOpen(f1, My.Application.Info.DirectoryPath & "\filename.txt", OpenMode.Input)
Do Until EOF(f1)
- filestring=LineInput(f1)
Loop
FileClose(f1)
