FormのErrorイベントでは連結型のコントロールに不正な値(オーバーフロー、型異常)した場合などの
Access固有のエラーを取得することができる。
以下の例はエラーが発生した場合は入力前の値に戻し、
Access固有のエラーメッセージを出力しないようにする例
Private Sub Form_Error(DataErr As Integer, Response As Integer) '値を元に戻す Me.ActiveControl.Undo 'メッセージを出力しない Response = acDataErrContinue End Sub
似たようなものとしてコンボボックスのリストにない値を入力した場合を
拾うイベントとしてNotInListがある。
動作確認環境:Access 2007