在VBA访问中输入表单中的数据时出错

时间:2013-11-14 13:37:46

标签: ms-access access-vba

您好我正在使用ACCESS中的表单为公司输入新数据。首先,表单向我展示了查询的当前数据,当我想在一行中的fiels中引入新数据时,我多次按Tab键,当结束时它给了我一个错误:

the data was added to the database but the data won't be displayed in the form because it 
doesn't satisfy

然后关闭表单,当我再次打开该公司的表单时,我输入的值就在那里...... 我怎么能解决这个错误,任何想法?

1 个答案:

答案 0 :(得分:0)

添加一些基本的错误捕获。如果你的代码还没有包含它,你真的需要阅读它。任何代码没有某些错误捕获只会导致代码写得不好。

首先,使用这样的shell并适当地修改它:

Sub|Function SomeName()
    On Error GoTo Err_SomeName          ' Initialize error handling.
    ' Code to do something here.

Exit_SomeName:                          ' Label to resume after error.
    Exit Sub|Function                   ' Exit before error handler.

Err_SomeName:                           ' Label to jump to on error.
    MsgBox Err.Number & Err.Description ' Place error handling here.
    Resume Exit_SomeName                ' Pick up again and quit.
End Sub|Function

如果遇到错误,它将跳转到Err_SomeName:行,然后显示带有错误编号和描述的消息框。然后它将退出Sub / Function。你真正想要做的不是弹出一个消息框,而是做一些实际上解决问题的事情。这就是错误处理的全部内容,确保程序完全按照预期的方式运行至关重要。