LOF 函数
更新:2007 年 11 月
返回一个 Long 值,表示用 FileOpen 函数打开的文件的大小(以字节为单位)。
在文件 I/O 操作中,My 功能具有比 LOF 更高的效率和更好的性能。有关更多信息,请参见 My.Computer.FileSystem 对象。
Public Function LOF(ByVal FileNumber As Integer) As Long
参数
- FileNumber
必需。一个包含有效文件号的 Integer。
异常
异常类型 |
错误号 |
条件 |
---|---|---|
FileNumber 不存在。 |
||
文件模式无效。 |
如果正在升级使用非结构化错误处理方式的 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.
智能设备开发人员说明
不支持此函数。
要求
**模块:**FileSystem
**程序集:**Visual Basic 运行库(在 Microsoft.VisualBasic.dll 中)