Question

VB 如何捕捉错误

比如：出现溢出错误怎么捕捉，或别的什么错误怎么捕捉，捕捉后又怎么办？？

Answer 1

print.debut 打印出错误好 根据你调用的喊出出现的返回值，一般错误就返回一个错误好 ，你根据这个错误号 去处理就可以了

Answer 2

Private Sub mErrInfo()
Dim msg As String
msg = " 错误代号: " & Err.Number & vbCrLf _
& " 信息内容: " & Err.Description
MsgBox msg, vbCritical, "错误信息"
Err.Clear
End Sub

直接调用这个过程就可以了

Answer 3

debug.print s (假设你要捕捉s)
这时，就会在立即窗口中显示s

你也可以添加监视（【视图】【监视窗口】）
当s改变时就会显示s的值（在运行时的监视窗口）

Answer 4

参考一下：

显示错误：
Private Sub Command1_Click()
On Error Goto Err
'你的代码
Exit Sub
Err:
Msgbox Err.Description,16,"错误号：" & Err.Number
End Sub

不显示错误（当程序中错误的语句不存在）
Private Sub Command1_Click()
On Error Resume next
dim A as Integer
A="abcde" '错误语句
End Sub

正常情况下，如果不加On Error Resume Next ，程序会报错
加了就没有报错

Answer 5

举例：
Private sub Command1_Click()
On Error Goto ErrHandle
Dim x as integer
x = 0 / 0 '制造一个错误

Exit Sub '一定要写
ErrHandle:
Msgbox "产生了一个错误，错误代码：" & Err.Code & " 描述：" & Err.Description
End Sub