救急!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

zym1110 2001-11-29 11:00:12
请问各位:怎样判断光驱中是否有光盘?
...全文
51 4 打赏 收藏 举报
写回复
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
icyer 2001-11-29
  • 打赏
  • 举报
回复
当然,你还得先“引用”“Microsoft Scripting Runtime”
icyer 2001-11-29
  • 打赏
  • 举报
回复
Dim fso As New FileSystemObject
Dim drive As drive

For Each drive In fso.Drives
If drive.DriveType = CDRom Then
If drive.IsReady Then
MsgBox "CDROM中有盘!"
Else
MsgBox "CDROM中没盘!“"
End If
Exit For
End If
Next
foolishtiger 2001-11-29
  • 打赏
  • 举报
回复
1.用FSO
2.用错误捕获
zym1110 2001-11-29
  • 打赏
  • 举报
回复
没有人知道吗
发帖
VB基础类

7681

社区成员

VB 基础类
社区管理员
  • VB基础类社区
加入社区
帖子事件
创建了帖子
2001-11-29 11:00
社区公告
暂无公告