用VB测定可移动驱动器是否准备好

Microsoft脚本运行时包括drive对象，该对象使程序能够返回有关驱动器是否已放入计算机的信息。可以通过FileSystemObject drive属性访问drive对象。drive属性对象返回关于驱动器是否已安装在计算机上的所有信息的集合。

您可以通过驱动器信息集合来操作驱动器，并通过调用驱动器号方法来返回特定的驱动器。

Dim objFSO As FileSystemObject

Dim objDrive作为驱动器

Set objFSO = New FileSystemObject

对于objFSO中的每个objDrive。强迫

备注:处理每个驱动器

然后

注意:取回A驱动器

设置objDrive = objFSO。驱动器。项目(“A”)

drive对象中有一个DriveType属性，该属性返回一个驱动器，该驱动器可以指示该驱动器是可移动驱动器、CD-ROM驱动器还是固定驱动器。它还支持IsReady属性，该属性确定是否可以访问驱动器。

调试。PrintobjDrive . DriveType & ":" & objDrive。否可以使用

对象还支持其他有用的方法，如FileSystem属性，该属性返回驱动器上的文件信息。支持的可用空间属性返回驱动器可用的总字节数。