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.
Example:
Sub Main
Dim FileLength
Open "TESTFILE" For Input As #1
FileLength = LOF(1)
Print FileLength
Close #1
End Sub
Related Topic: