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函数来检测文件尾。示例中假设 MYFILE 为有数个文本行的文本文件。
Dim InputData
Open "MYFILE" For Input As #1 ' 为输入打开文件。
Do While Not EOF(1) ' 检查文件尾。
Line Input #1, InputData ' 读入一行数据。
Debug.Print InputData ' 在立即窗口中显示。
Loop
Close #1 ' 关闭文件。
相关基础知识:
Integer数据类型
一种数据类型,将整型变量作为 2 字节整数存储起来,范围是 -32,768 到 32,767 之间的数字。Integer数据类型也可表示列举值。在 Visual Basic 可用百分比符号 (%) 的类型声明字符来表示一个Integer。
Boolean数据类型
只有两种值的数据类型,这两种值分别为True(-1) 或False(0)。布尔变量是以 16 位 ( 2 字节 ) 数字存储的。
参数
传递给一个过程的常数、变量或表达式。
在Open语句中用来打开文件的号码。对不能访问其它应用程序的文件,使用1–255 范围内的文件号,对可由其它应用程序访问的文件,使用256–511 范围内的文件号。