EOF Function

Syntax

EOF([#]StreamNum)

Group

File

Description

Return True if StreamNum is at the end of the file.

Parameters

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

---

Sub Main
    Open "XXX" For Input As #1
     While Not EOF(1)
        Line Input #1, L
        Debug.Print L
    WendClose #1
End Sub