LOF

Returns a Long representing the size, in bytes, of a file opened by using the Open statement.

Syntax: LOF( filenumber )

filenumber
required Integer containing a valid file number.

Note

Use the FileLen function to obtain the length of a file that is not open.

Note

In BETA 1005, LOF raises run-time error -2147467259 (&H80004005) for a filenumber that is not open, where VB6 raises 52 (Bad file name or number).

Example

This example uses the LOF function to determine the size of an open file. This example assumes that TESTFILE is a text file containing sample data.

Dim FileLength
Open "TESTFILE" For Input As #1    ' Open file.
FileLength = LOF(1)    ' Get length of file.
Close #1    ' Close file.

See Also