GetDiskFreeSpace ( DiskName 〔, UnitofByte〕 )

DiskName

取得するディスクのボリュームを文字列，または値を格納した変数名で指定します。ディスクのコロン（:）は省略してもかまいません。

UnitofByte

取得する容量の単位を指定します。

この値は次のどれかになります。

値	意味
KB	キロバイト
MB	メガバイト

空き容量は切り捨てた値を返します。例えば，UnitofByteにMBが指定され，容量が1メガバイトに満たない場合は，0を返します。

この値は省略できます。省略した場合，KBを仮定します。

Dim  MBsize, Bsize
MBsize = GetDiskFreeSpace ( "A:" ,MB )
Bsize = MBsize * 1024 *1024
MessageBox ( "FDの空き容量は"+ Bsize +"バイトです。" )