造成这个问题的原因是在生成记录集时可能存在未及时清理的脏数据。解决方法可以有以下几种:
以下是使用Requery方法的示例代码:
Dim rs As New ADODB.Recordset rs.Open "SELECT * FROM MyTable", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
If Not rs.EOF Then rs.MoveFirst rs.Requery '刷新数据,清理脏数据 End If
rs.AddNew ...
相关链接: