初学者请教：创建一文本并添加了一行数据，再次打开读取总行数，出现错误62，输入超出文件尾

本帖最后由 bcrun 于 2011-11-20 12:08:03 编辑

Open Txtlujing.Text For Input As #1

怎么可以这样用？能打开？ 就是这样打开的，我修改了一个语句，
 Do While Not EOF(1)
  Line Input #2, s
  m = m + 1
  Loop

这部分程序运行正确了 只是依据条件向程序最后一行添加数据的方式不对 追加数据：
Open Txtlujing.Text For Input As #1
要改成
Open Txtlujing.Text For Append As #1

引用 4 楼 chinaboyzyq 的回复:

追加数据：
Open Txtlujing.Text For Input As #1
要改成
Open Txtlujing.Text For Append As #1

以input方式打开会将原文件清空然后重新写入.
append是在文章末尾添加方式写入

+1

补充：VB ,  基础类