LOF
Returns the length of an open disk file
Syntax
`
Declare Function LOF ( ByVal filenum As Long ) As LongInt
`
Usage
`
result = LOF( filenum )
`
Parameters
`filenum`
The file number of an open disk file.
Return Value
The length in bytes of an open disk file.
Description
Returns the length, in bytes, of a file opened previously with `Open` using the given `filenum`.
With `Open Com` it returns the length of the data pending to be read in the receive buffer.
Example
`
Dim f As Long
f = FreeFile
Open "file.ext" For Binary As #f
Print LOF(f)
Close #f
`
Differences from QB

- None

See also

- `LOC`
- `EOF`
- `Open`