LOF function

Returns a long number for the number of bytes in the open file.

The parameter filenumber is required and must be an integer.

Sub Main
   Dim FileLength
   Open "TESTFILE" For Input As #1 
   FileLength = LOF(1)
   Print FileLength
   Close #1
End Sub