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 包含任何有效文件编号。
返回
达到打开文件或按顺序True打开Random的文件的末尾时的布尔值Input。
例外
文件模式无效。
示例
此示例使用 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使用，或者在使用该函数时使用InputGet。EOF 打开 Output文件后， EOF 始终返回 True。
