编辑组合框时访问表单不会更新，必须移动到下一条记录

Question

我有一个带有组合框列表的连续表格，图片在这里：

如您所见，访问表单左侧有一个小铅笔，用于显示表单中的当前记录正在被编辑。我需要将其更改为三角形，以便其他表单使用按钮正确更新。是否有VBA“失去焦点”或将铅笔改为黑色三角形？我试图移动到下一个记录，但由于某种奇怪的原因它崩溃了。此外，它相当复杂，因为如果用户在最后一条记录上，我必须添加逻辑，因为它会抛出错误，因为它无法转到最后一条记录上的下一条记录。我的 vba 低于（目前由于某种原因导致访问崩溃）

with recordset
if .recordcount=1 then
docmd.gotorecord record:=acfirst

elseif .absoluteposition = .recordcount - 1 then
docmd.gotorecord record:=acprevious
docmd.gotorecord record:=acnext
else
docmd.gotorecord record:=acnext
docmd.gotorecord record:=acprevious
end if
end with
end sub

Answer 1

通常的方法是保存：

 If Me.Dirty Then
     Me.Dirty = False
 End If

选择合适的活动。

如果 Access 崩溃，通常意味着您需要备份、压缩和修复以及反编译。