陷阱所有错误
应将基本错误处理添加到生产代码中的所有过程,否则意外错误将导致 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 中错误处理的更详细讨论,请参阅:
- Allen Browne 在 VBA 中的错误处理
- Luke Chung 的 Microsoft Access,VBA 和 Visual Basic
6(VB6)
的错误处理和调试技巧和技巧