Seek Function

Syntax

Seek([#]StreamNum)

Group

File

Description

Return StreamNum current position. For Random mode files this is the record number. The first record is 1. Otherwise, it is the byte position. The first byte is 1.

NOTE: Unicode text files opened with Input mode use character positions, not byte positions.

Sandbox

Sandbox mode blocks this function.

Parameters

Parameters	Description
StreamNum	Streams 1 through 255 are private to each macro. Streams 256 through 511 are shared by all macros.

Example

Sub Main
    Open "XXX" For Input As #1
    Debug.Print Seek(#1) ' 1
    Line Input #1, L$
    Debug.Print Seek(#1)
    Close #1
End Sub