FileLen( filename )
Returns a Long integer that is the length of the file in bytes
Related Topics: LOF Function
Example:
Sub Main
Dim MySize
MySize = FileLen("C:\TESTFILE") ' Returns file length (bytes).
Print MySize
End Sub