LOF 函数

更新：2007 年 11 月

返回一个 Long 值，表示用 FileOpen 函数打开的文件的大小（以字节为单位）。

在文件 I/O 操作中，My 功能具有比 LOF 更高的效率和更好的性能。有关更多信息，请参见 My.Computer.FileSystem 对象。

Public Function LOF(ByVal FileNumber As Integer) As Long

参数

• FileNumber
  必需。一个包含有效文件号的 Integer。

异常

如果正在升级使用非结构化错误处理方式的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象） 比较错误号。） 然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述 替换这种错误控制。

备注

对于尚未打开的文件，使用 FileLen 函数可获得其长度。

示例

本示例使用 LOF 函数确定已打开文件的大小。本示例假定 TestFile 是包含示例数据的文本文件。

Dim length As Long
FileOpen(1, "C:\TESTFILE.TXT", OpenMode.Input) ' Open file.
length = LOF(1)   ' Get length of file.
MsgBox(length)
FileClose(1)   ' Close file.

智能设备开发人员说明

不支持此函数。

要求

命名空间：Microsoft.VisualBasic

**模块：**FileSystem

**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）

请参见

参考

EOF 函数

FileLen 函数

Loc 函数

FileOpen 函数

IOException

其他资源

读取文件 (Visual Basic)

写入文件 (Visual Basic)