vb60编程 freefile()函数
以下语句有什么错误吗?为什么老在Do While EOF(bb) = False出现“错误的文件名或号码”的错误?
用vb60来编程:
bb=FreeFile ()
Open Text1.Text For Input As #bb
Do While EOF(bb) = False
Line Input #bb, eamil20
.
.
.
.
.
loop
参考答案:确认text1.text的值两边没有空格
比如text1.text=" c:\a.txt"就不行
确认你想打开的文件没有被别的程序应用
确认text1.text的值的文件存在
比如
text1.text="a.ee"
但程序启动目录上并没有a.ee
text1.text="c:\a.ee"
但c:\上并没有a.ee
等等,因为不知你如何对text1.text赋值,所以也说不清
自已用调试(Debug)或单步跟踪功能查找吧