1、On Error 语句
On Error GoTo line '如果有错误,跳转 行标位置
On Error Resume Next '如果有错误,接着错误代码之后 继续运行
On Error GoTo 0 '禁止已启动的任何错误程序
'1 、错了就跳转 2、 错了继续 3、已经错了,不执行错误
举例:
2、debug.print 语句
把 参数打印在 窗体的立即窗口中显示
eg:
Private Sub Command1_Click()
Debug.Print Command1.Caption
End Sub
结果:
3、msgbox 函数
msgbox "打印文本”