Abfangen von Indexverletzungen mit eigenen Meldungen

Es gibt in AccessXP ein neues Formularereignis, dass es erlaubt, eine allgemeine Reaktion auf sogenannte Laufzeitfehler (meiner Meinung nach besser: Datenfehler) zu reagieren:
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Select Case DataErr
Case 3022 'Indexverletzung
MsgBox "Eigene Meldung!"
Response = 0
Case Else
'Normale Meldung
End Select