访问VBA:关闭具有绑定表的表单时添加记录

Question

我遇到了这个问题，我不知道发生了什么。窗体具有绑定列表框，当选择列表中的项时，用户可以通过单击删除按钮从相关表中删除该项。这部分很简单，而且有效。问题是，每次在删除操作后关闭表单时，它都会在描述字段(第 1 列(中添加一条新记录，其中包含已删除记录的 ID(第 0 列(，并在 ID 字段(第 0 列(中添加正确的增量 ID。更糟糕的是，未绑定列表不允许选择项目。

这是一个非常简单的删除代码：

aSQL = "DELETE * FROM Category WHERE Cat_ID = " & Me.Update_Category_lstAllCats.Column(0)
DoCmd.RunSQL aSQL

任何建议将不胜感激。

Answer 1

显然，答案是在 Form_Load(( 子中定义一个行源，如下所示：

Me.Update_Category_lstAllCats.RowSource = "SELECT * FROM Category ORDER BY Cat_Name;"

以及在列表属性中排除对行源的任何引用。然后所有其他部分都到位。