陷阱所有错误

应将基本错误处理添加到生产代码中的所有过程,否则意外错误将导致 Access 崩溃或邀请最终用户进入调试模式。

陷阱所有错误的基本错误处理程序的典型模式是:

Sub Name()
On Error GoTo errHandler

'[some code...]

exitHandler:
    'Clean up any objects
    Exit Sub

errHandler:
    Select Case Err.Number
        'Any expected error cases go here
    Case Else
        MsgBox Err.Number & Err.Description
    End Select
    Resume exitHandler   'Make sure objects get cleaned up when code threw an error
End Sub

有关 Access VBA 中错误处理的更详细讨论,请参阅: