LOF function

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