Difference between revisions of "Visual Basic .net"
From ScienceZero
m |
m |
||
Line 5: | Line 5: | ||
'''Reading text files line by line:'''<br /> | '''Reading text files line by line:'''<br /> | ||
<code> | <code> | ||
− | Dim f1 As Long | + | Dim f1 As Long<br /> |
dim filestring as string | dim filestring as string | ||
Revision as of 08:46, 27 December 2009
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)
Note: My.Application.Info.DirectoryPath & "\filename.txt" may be replaced by "C:\some_path\file.txt"