欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

請(qǐng)參閱                   應(yīng)用于

描述

返回驅(qū)動(dòng)器或網(wǎng)絡(luò)共享的總字節(jié)數(shù)。

語(yǔ)法

object.TotalSize

object 應(yīng)為 Drive 對(duì)象的名稱。

說(shuō)明

以下代碼舉例說(shuō)明如何使用 TotalSize 屬性：

Sub ShowSpaceInfo(drvpath)
    Dim fs, d, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
    s = "驅(qū)動(dòng)器 " & d.DriveLetter & ":"
    s = s & vbCrLf
    s = s & "總?cè)萘浚?" & FormatNumber(d.TotalSize/1024, 0) & "KB"
    s = s & vbCrLf
    s = s & "可用空間： " & FormatNumber(d.AvailableSpace/1024, 0) & "KB"
    MsgBox s
End Sub