Access VBA教程:错误捕获

使用 On Error GoTo 语句可以捕获错误,并将过程流转向过程中错误处理语句的位置。例如,下列语句将流程转向ErrorHandler: 标签行:


On Error GoTo ErrorHandler

要确保在过程中每个错误处理标签名称是唯一的,而不会与过程中的其他任何元素发生冲突;并且在名称后面追加冒号。在过程中,请将 Exit Sub 或 Exit Function 语句放置在错误处理标签前面,这样如果没有错误发生,过程将不会运行错误检查代码。


Sub CausesAnError()
    ' Direct procedure flow.
    On Error GoTo ErrorHandler
    ' Raise division by zero error.
    Err.Raise 11
    Exit Sub
ErrorHandler:
    ' Display error information.
    MsgBox "Error number " & Err.Number & ": " & Err.Description
    ' Resume with statement following occurrence of error.
    Resume Next
End Sub

Err对象的 Raise方法将生成指定的错误。Err对象的 Number属性返回最近一次运行时错误所对应的编号,Description属性返回给定错误所对应的消息文本。

注意

上页:Access VBA教程:将 Microsoft Access 用作 DDE 服务器 下页:Access VBA教程:在域聚合函数中计算字段

Access VBA教程:错误捕获

Access VBA教程:在域聚合函数中计算字段 Access VBA教程:在 SQL 语句中使用国际日期格式
Access VBA教程:运行时错误处理的元素 Access VBA教程:设置数据访问页和控件属性
Access VBA教程:设置窗体、报表和控件的属性 Access VBA教程:在代码中设置启动属性和选项
Access VBA教程:在 Visual Basic 中设置数据访问页属性 Access VBA教程:在 Visual Basic 中设置窗体、报表和控件属性
Access VBA教程:从 Visual Basic 中设置选项 Access VBA教程:在 Visual Basic 中设置 ActiveX 数据对象的属性
Access VBA教程:在 Visual Basic 中设置数据访问对象的属性 Access VBA教程:用 Visual Basic 设置属性
Access VBA教程:用宏设置属性 Access VBA教程:从 Visual Basic 中设置启动属性
Access VBA教程:限制记录子集的数据 Access VBA教程:日期与时间条件表达式
Access VBA教程:来自窗体上控件的日期与时间条件 Access VBA教程:条件表达式中的多个字段
Access VBA教程:来自窗体上控件的数值条件 Access VBA教程:数值条件表达式
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号