驱动器属性
返回一个 Drive 集合,该集合由本地计算机上可用的所有 Drive 对象组成。
语法
对象。驱动器
对象始终是 FileSystemObject。
备注
可移动媒体驱动器中不需要插入媒体即可显示在 Drives 集合中。
可以使用 For Each 循环访问 驱动器 集合的成员 ...下一个 构造,如以下代码所示。
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 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈