错误62怎么解决？

Question

如题所述

Answer 1

输入超出文件尾（错误 62）

不能对文件尾位置后进行读入。此错误有以下原因和解决方法：

1）Input # 或 Line Input #
语句要到已读完文件或空文件中读入数据。

在 Input # 语句之前直接使用 EOF
函数来测试是否处在文件的结尾。

2）在以 Binary 访问所打开的文件上使用 EOF 函数。

EOF 只能用在顺序 Input 访问所打开的文件上。在
Binary 访问所打开的文件上使用 Seek 和 Loc。

EOF 函数，返回一个 Integer，它包含 Boolean 值 True，表明已经到达为 Random
或顺序 Input 打开的文件的结尾。

EOF 函数示例

本示例使用 EOF 函数来检测文件尾。示例中假设 MYFILE
为有数个文本行的文本文件。

Dim InputData
Open "MYFILE" For Input As #1   ' 为输入打开文件。
Do While Not EOF(1)   ' 检查文件尾。
   Line Input #1, InputData   ' 读入一行数据。
   Debug.Print InputData   ' 在立即窗口中显示。
Loop
Close #1   ' 关闭文件。

Seek 函数，返回一个 Long，在
Open 语句打开的文件中指定当前的读/写位置。

Loc 函数，返回一个 Long，在已打开的文件中指定当前读/写位置。