File Path VisualBasic Script

Sub GetFileSize()
    Dim TheFile As String
    TheFile = "c:\MSOFFICE\EXCEL\EXCEL.EXE"
    MsgBox FileLen(TheFile)
End Sub