Drives 集合意思是描述所有可用驅動器的唯讀集合。
基本介紹
- 中文名：Drives
- 屬性：描述所有可用驅動器的唯讀集合
- Drive：Sub ShowDriveList
- Dim ：fs, d, dc, s, n
簡介
Drives 集合 描述所有可用驅動器的唯讀集合。說明對於可刪除的驅動器，不需要將媒體插入其中，它就可以在Drives集合中顯示出來。下面的代碼舉例說明了如何獲得 Drives 集合，以及如何用 For Each...Next 語句來訪問該集合中的每個整理下代碼
Drive：Sub ShowDriveList
Dim fs, d, dc, s, n
Set fs = CreateObject("Scripting.FileSystemObject")
Set dc = fs.Drives For Each d in dc
s = s & d.DriveLetter & " - "
If d.DriveType = Remote Then
n = d.ShareName
Else
n = d.VolumeName
End If
s = s & n & vbCrLf
Next
MsgBox s
End Sub
