FileSystem.EOF(Int32) 方法
定义
重要
一些信息与预发行产品相关，相应产品在发行之前可能会进行重大修改。 对于此处提供的信息，Microsoft 不作任何明示或暗示的担保。
当达到为进行 True 或顺序 Random 而打开的文件的结尾时，此方法返回布尔值 Input。
public:
static bool EOF(int FileNumber);public static bool EOF (int FileNumber);static member EOF : int -> boolPublic Function EOF (FileNumber As Integer) As Boolean参数
- FileNumber
- Int32
必需。 一个包含任何有效文件号的 Integer。
返回
当达到为进行 Random 或顺序 Input 而打开的文件的结尾时，为布尔值 True。
例外
文件模式无效。
示例
此示例使用 EOF 函数检测文件的末尾。 此示例假定 Testfile 是一个包含多行文本的文本文件。
Dim TextLine As String
' Open file.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Loop until end of file.
Do Until EOF(1)
' Read the line into a variable.
TextLine = LineInput(1)
' Display the line in a message box.
MsgBox(TextLine)
Loop
FileClose(1)
注解
使用 EOF 可避免通过尝试获取超过文件末尾的输入而生成的错误。
函数 EOF 将返回 False ，直到到达文件末尾。 打开 Random 或 Binary 访问的文件后， EOF 返回 False ，直到上次执行的 FileGet 函数无法读取整个记录。
打开文件以供 Binary 访问时，尝试使用 Input 函数读取文件，直到 EOF 返回 True ，将生成错误。 LOF使用 和 Loc 函数，而不是EOF在使用 Input读取二进制文件时使用 ，或使用 Get 函数时使用 EOF 。 打开的文件 Output后， EOF 始终返回 True。
