FileSystem.EOF(Int32) 方法

定义

当达到为进行 True 或顺序 Random 而打开的文件的结尾时,此方法返回布尔值 Input

public:
 static bool EOF(int FileNumber);
public static bool EOF (int FileNumber);
static member EOF : int -> bool
Public 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 ,直到到达文件末尾。 打开 RandomBinary 访问的文件后, EOF 返回 False ,直到上次执行的 FileGet 函数无法读取整个记录。

打开文件以供 Binary 访问时,尝试使用 Input 函数读取文件,直到 EOF 返回 True ,将生成错误。 LOF使用 和 Loc 函数,而不是EOF在使用 Input读取二进制文件时使用 ,或使用 Get 函数时使用 EOF 。 打开的文件 Output后, EOF 始终返回 True

适用于

另请参阅