使用表格对象的Dirty属性来强制保存数据更改。例如,使用以下代码:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.Dirty Then
Me.Dirty = False
End If
End Sub
在表单更新之前,该代码检查表单对象的Dirty属性是否为真。如果是,它将Dirty属性设置为False,即保存数据更改。这样,修改表格数据后,不纠结在数据不会立即更新的问题,因为数据已经成功保存。