LOF(filenumber)
Returns a long number for the number of bytes in the open file.
The parameter filenumber is required and must be an integer.
Related Topics: FileLen
Example:
Sub Main
Dim FileLength
Open "TESTFILE" For Input As #1
FileLength = LOF(1)
Print FileLength
Close #1
End Sub