EOF 函数

重要:  本文是由机器翻译的,请参阅免责声明。请在 此处 中查找本文的英文版本以便参考。

注意: 如果 Microsoft Jet 表达式服务运行在沙盒模式下,可防止潜在不安全的表达式的求值,则禁用函数、 方法、 对象或本主题中介绍的属性。沙盒模式的详细信息,"沙盒模式"中搜索帮助。

返回一个包含布尔值True随机打开的文件的末尾,或已达到连续输入时的整数。

语法

EOF ( filenumber )

需要的filenumber参数是一个包含任何有效的文件编号的整数

备注

使用EOF可避免由于试图获取输入文件的末尾生成的错误。

EOF函数返回False ,直到达到文件的末尾。打开以进行随机二进制访问的文件, EOF返回False ,直到最后一个执行Get语句是无法读取整个记录。

二进制访问打开的文件,尝试通过使用Input函数,直到EOF ,则返回True文件读取生成错误。阅读的输入,二进制文件时,而不是EOF使用LOFLoc函数,或使用EOF函数时使用的获取输出为打开的文件, EOF始终返回True

示例

注意: 下面的示例说明使用此函数在 Visual Basic for Applications (VBA) 模块。有关处理 VBA 的详细信息,搜索旁边的下拉列表中选择开发人员参考,然后在搜索框中输入一个或多个条款。

此示例使用EOF函数检测文件的末尾。此示例假定该MYFILE文本文件几行的文本。

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

注意: 机器翻译免责声明:本文是由无人工介入的计算机系统翻译的。Microsoft 提供机器翻译是为了帮助非英语国家/地区用户方便阅读有关 Microsoft 产品、服务和技术的内容。由于机器翻译的原因,本文可能包含词汇、语法或文法方面的错误。

扩展你的技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×