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

Microsoft® Visual Basic® Scripting Edition
VolumeName 屬性		 語言參考
版本 3

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

描述
設(shè)置或返回指定驅(qū)動(dòng)器的卷標(biāo)�？勺x寫。
語法
object.VolumeName [= newname]

VolumeName 屬性的語法有以下部分：

部分 描述
object 必選。應(yīng)為 Drive 對(duì)象的名稱。
newname 可選。如果提供此參數(shù)，則 newname 為指定的 object 的新名稱。

說明
以下代碼舉例說明如何使用 VolumeName 屬性： 
Sub ShowVolumeInfo(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 & ": - " & d.VolumeName
    MsgBox s
End Sub