Seek (Function)function

Gets the position of the next read/write operation for a file or device

Syntax

Declare Function Seek ( ByVal filenum As Long ) As LongInt

Parameters

Return value

The file position where the next read or write operation will take place.

Description

The position is given in records if the file was opened in Random access mode, in bytes in any other case. The file position returned is 1-based, so the first record of a file is 1.

The Seek statement is used to set the position of the next read or write operation.

Remarks

Differences from QB

• None
  
  

See also

• Seek (Statement)
  
• LOC
  
• Open
  
  

Example

Dim f As Long, position As LongInt



f = FreeFile

Open "file.ext" For Binary As #f



position = Seek(f)



Close #f

Reference

• Documented in KeyPgSeekreturn.html