删除第一条记录的问题

时间:2013-06-06 14:56:12

标签: vba ms-access ms-access-2007

当我尝试从添加记录表中删除第一条记录时,我收到此错误:

RUN-TIME ERROR'3021'没有当前记录

仅当我尝试删除第一条记录时才会发生这种情况。当我尝试删除第二个或第三个时,我的代码工作正常:

Me.Labour_subform.Form.Recordset.Delete 

Me.Labour_subform.Form.Recordset.MoveNext

这是我按下按钮的代码。任何人都知道如何纠正这个?

1 个答案:

答案 0 :(得分:1)

当我处理记录集时,我总是检查EOF然后移动到第一条记录。

If not Me.Labour_subform.Form.Recordset.EOF then
     Me.Labour_subform.Form.Recordset.MoveFirst
     'Then delete or do whatever
end if