VB新手求高手

来源：百度知道 编辑：UC知道 时间：2024/09/20 14:41:46
我是一个新手，自己在学，请问高手们，如果VB无法检测到某些路径的时候就会提示找不到路径，如何实现，当无法找到指定路径或者是盘符的时候提示：找不到对应的盘符或路径， 而不是一个本质的错误提示，但是不需要窗体来创建这个错误提示！知道的请贴一下代码 谢谢了

Private Sub Command1_Click()
Dim path As String
path = InputBox("请输入文件路径")
If Len(Dir(path)) = 0 Then
MsgBox "找不到对应的盘符或路径"
Exit Sub
Endi If
End sub

Private Sub Form_Click()
Dim path As String
path = InputBox("请输入文件路径")
If Len(Dir(path)) = 0 Then
MsgBox "找不到对应的盘符或路径"
Exit Sub
Endi If
'......
End Sub

你用的是Visual Basic 2008 吗
如果不是建议你下载来用，我在用，十分好用
如果是请输入
If My.Computer.FileSystem.FileExists("你的文件") Then
MsgBox("文件未找到！",MsgBoxStyle.OkCancel+MsgBoxStyle.Information, "错误")
Else
语句块
End If
如果没用
看其他人的吧

设置错误陷阱。

On Error ...?