2,506
社区成员
发帖
与我相关
我的任务
分享Sub Main()
On Error GoTo ErrHandler
If LenB(Dir("E:\")) = 0 Then
MsgBox "E: 盘不存在。"
End If
ExitEntry:
Exit Sub
ErrHandler:
MsgBox "光驱 E: 盘未插入。"
Resume ExitEntry
End SubIf LenB(Dir("E:\")) = 0 Then
MsgBox "E: 盘不存在。"
End If