EOF 函数

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

语法

EOF(filenumber) 必要的 filenumber 参数是一个 Integer，包含任何有效的文件号。

说明

使用 EOF 是为了避免因试图在文件结尾处进行输入而产生的错误。 直到到达文件的结尾，EOF 函数都返回 False。

对于为访问 Random 或 Binary 而打开的文件，直到最后一次执行的 Get 语句无法读出完整的记录时，EOF 都返回 False。 对于为访问 Binary 而打开的文件，在 EOF 函数返回 True 之前，试图使用 Input 函数读出整个文件的任何尝试都会导致错误发生。在用 Input 函数读出二进制文件时，要用 LOF 和 Loc 函数来替换 EOF 函数，或者将 Get 函数与 EOF 函数配合使用。对于为 Output 打开的文件，EOF 总是返回 True。

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   '

关闭文件。

[/code]
相关基础知识：

　

Integer 数据类型

一种数据类型，将整型变量作为 2 字节整数存储起来，范围是 -32,768 到 32,767 之间的数字。Integer 数据类型也可表示列举值。在 Visual Basic 可用百分比符号 (%) 的类型声明字符来表示一个 Integer。

　

Boolean 数据类型

只有两种值的数据类型，这两种值分别为 True(-1) 或 False(0)。布尔变量是以 16 位 ( 2 字节 ) 数字存储的。

参数

传递给一个过程的常数、变量或表达式。

　

文件号

在 Open 语句中用来打开文件的号码。对不能访问其它应用程序的文件，使用1–255 范围内的文件号，对可由其它应用程序访问的文件，使用256–511 范围内的文件号。
http://www10.zzu.edu.cn/ie_wangjunfeng/daquan/function/contents/EOF.htm