ファイルの場合は、指定されたファイルのサイズをバイトで戻します。
構文
object.Size
引数
Object: 必須。常にファイル・システム・オブジェクト。
備考
次のコードは、Sizeメソッドの使用方法を示しています:
例1:
Function ShowFileSize(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(filespec)
s = " uses " & f.size & " bytes."
ShowFileSize = s
End Function
'Usage
Dim FileSize
FileSize = ShowFileSize("C:\Path\To\Your\File.txt")
'Output: If file size is 50 bytes then it returns uses 50 bytes.