Loc Function |
Microsoft.VisualBasic.FileSystem
Loc( filenumber )
Any valid file number
A Long indicating the current position of the read/write pointer in a file
Determines the current position of the file read/write pointer
If you have opened the file in Random mode, Loc returns the record number of the last record read or written.
If you have opened the file in Input or Output modes (sequential), Loc returns the current byte position in the file divided by 128.
If you have opened the file in Binary mode, Loc returns the position of the last byte read or written.
Dim fr As Integer = FreeFile( ) Dim sChar As Char FileOpen(fr, "c:\data.txt", OpenMode.Binary, OpenAccess.Read) Do While Loc(fr) < LOF(fr) FileGet(fr, sChar) Debug.Write(Loc(fr) & ": ") Console.WriteLine(sChar) Loop
For sequential files, the return value of Loc is not required and should not be used.
Note that you cannot set the position of the file pointer using Loc .
FileOpen Procedure, LOF Function