Проблем при удалении первой записи

Question

При попытке удалить первую запись из таблицы добавленных записей я получаю эту ошибку:

RUN-TIME ERROR «3021» NO CURRENT RECORD

Это происходит только тогда, когда я пытаюсь для удаления первой записи. При попытке удалить второй или третий мой код работает отлично:

Me.Labour_subform.Form.Recordset.Delete 

Me.Labour_subform.Form.Recordset.MoveNext 

Это мой код on_click кнопки. Доза, кто-нибудь знает, как исправить это?

Answer 1

Я всегда проверяю EOF, а затем перехожу к первой записи, когда я имею дело с наборами записей.

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