Sub Main Dim MySize MySize = FileLen("C:\TESTFILE") ' Returns file length (bytes). Print MySize End Sub