共用方式為


駕車財產

回傳一個包含本地機器上所有磁碟驅動器物件的磁碟機集合

語法

物件駕駛

物件始終是 FileSystemObject

註解

可移除媒體光碟機不需要插入媒體,才能出現在 磁碟 機集合中。

你可以透過使用 For Each... 來迭代 Drives 集合的成員。 下一個 結構如以下程式碼所示。

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 = 3 Then
            n = d.ShareName
        Else
            n = d.VolumeName
        End If
        s = s & n & vbCrLf
    Next
    MsgBox s
End Sub

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應