Input$ Function

Syntax
Input[$](N, [#]StreamNum)
Group
File
Description
Return N chars from StreamNum.
Sandbox
Sandbox mode blocks this function.
Parameters Description
N Read this many chars. If fewer than that many chars are left before the end of file then a run-time error occurs.
StreamNum Streams 1 through 255 are private to each macro. Streams 256 through 511 are shared by all macros.

Sub Main
    Dim L, T$
    Open "XXX" For Input As #1
    L = LOF(1)
    T$ = Input$(L,1)
    Close #1
    Debug.Print T$;
End Sub