在vb中怎么判断文件结尾?
菜鸟提问: 在vb中,我用readline一行一行读取txt文件,怎么判断文件结尾?或判断文件的总行数?
先谢谢了!
菜鸟提问: 在vb中,我用readline一行一行读取txt文件,怎么判断文件结尾?或判断文件的总行数?
先谢谢了!
2006-12-04 12:58
Dim nFile%, sFname$, strRead$
sFname = "C:\boot.ini" '这里是文件名
nFile = FreeFile
Open sFname For Input As nFile
Do While Not EOF(nFile)
Line Input #nFile, strRead
Debug.Print strRead
Loop
Close #nFile
[此贴子已经被作者于2006-12-4 14:12:00编辑过]
2006-12-04 14:11