FileSystem.Loc(Int32) 方法

定义

命名空间:

Microsoft.VisualBasic

程序集:

Microsoft.VisualBasic.Core.dll

Source:

FileSystem.vb

返回指定打开文件中当前读/写位置的值。

public:
 static long Loc(int FileNumber);

public static long Loc (int FileNumber);

static member Loc : int -> int64

Public Function Loc (FileNumber As Integer) As Long

参数

FileNumber

Int32

必需。 任何有效的 Integer 文件号。

返回

Int64

打开文件中当前读/写位置。

例外

IOException

文件模式无效。

示例

此示例使用 Loc 函数返回打开文件中的当前读/写位置。 此示例假定 MyFile 是包含多行示例数据的文本文件。

Dim location As Long
Dim oneChar As Char
FileOpen(1, "C:\TESTFILE.TXT", OpenMode.Binary)
While location < LOF(1)
    Input(1, oneChar)
    location = Loc(1)
    WriteLine(1, location & ControlChars.CrLf)
End While
FileClose(1)

注解

函数 Loc 从零开始;使用它检索文件中的第一个字节将返回 0。

提供 Loc 函数是为了向后兼容，可能会影响性能。 对于非旧应用程序，对象 My.Computer.FileSystem 提供更好的性能。 有关详细信息，请参阅 Visual Basic 中的文件访问。

下面介绍了每个文件访问模式的返回值：

模式	返回值
Random	从文件读取或写入文件的最后一条记录的数目。
Sequential	文件中的当前字节位置除以 128。 但是，对于顺序文件，返回 Loc 的信息既不使用也不是必需的。
Binary	读取或写入的最后一个字节的位置。

另请参阅

• EOF(Int32)
• LOF(Int32)
• Seek
• IOException