基本介紹
簡介,
簡介
讀/寫屬性。語法object.VolumeName [= newname]VolumeName 屬性有下列幾部分:部分描述object必需的。總是一個 Drive 對象的名字。newname可選的。如果提供的話,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 = "Drive " & d.DriveLetter & ": - " & d.VolumeName
MsgBox s
End Sub
ShowVolumeInfo(drvpath)