你可以通过全局的 Err 对象来得到具体的错误信息,如:Private Sub Command1_Click()
Dim i As Long
On Error GoTo errHandler
i = 1 / 0
Exit Sub
errHandler:
MsgBox Err.Number & "-" & Err.Description
End Sub
Dim i As Long
On Error GoTo errHandler
i = 1 / 0
Exit Sub
errHandler:
MsgBox Err.Number & "-" & Err.Description
End Sub
解决方案 »
- VB程序打包后不能在其他机器正常运行?!
- 有无办法不使用设置visible为False而使用某个主菜单不显示(隐藏)?
- 急啊,水晶报表问题,搞不懂哪里有问题了?报表出不来,出来了“Server has not yet been opened”
- 如何在vb6中不用API函数创建程序快捷方式?
- 如何搜索TreeView中的NODE?
- iif的问题:这两句为什么不等价?
- 求一个可以背英语单词的vb小程序
- 懂电路分析者请进
- 关于RichTextBox的问题:熟悉文本处理的朋友请进!!!
- 本人特急,希望各位行行好
- 急!!!提示 ActiveX 不能创建对象脚本?但是呢?.......
- 再问 拖动文件到具有多页页面的Tabstrip时,如何判断放置的是哪个页面?
MsgBox "错误号:" & Err.Number & vbCrLf & "错误:" & Err.Description编译以后同样会报错的,我试过了,可以的