如何取得vb程序的错误提示的编号？

来源：百度知道 编辑：UC知道 时间：2024/06/06 09:17:04
在运行vb程序的过程中，如果发生错误，经常弹出一些错误的提示信息，那么如何获取这些错误信息的编号呢？

private sub yoursub()
on error goto errtrap '捕获错误,转到errtrap
'要执行的代码
......
exit sub

errtrap: '错误出口
msgbox err.number '显示错误编号
end sub

private sub yoursub()
on error goto errtrap '捕获错误,转到errtrap
'要执行的代码
......
exit sub

errtrap: '错误出口
msgbox err.number '显示错误编号
end sub

除了上述代码 还可以:
private sub yoursub()
on error resume next'忽略错误,继续向下执行
...'可能出错的代码
if err.number <>0 then msgbox err.number '显示错误编号 :exit sub
'要执行的代码
......
end sub