We can position ourselves on any row of a dynaset. When positioned in the
middle of a dynaset (current row is not the last row), we navigate to the next row
using DbMoveNext.
However, when we are positioned on the last row (current row is the last row)
and then execute DbMoveNext, the end-of-file condition (EOF) becomes TRUE and
current row becomes invalid. In this case, we reset the current row using the
DbMoveLast method.
The click event procedure for our Next button looks like:
Private Sub cmdNext_Click()
EmpDynaset.MoveNext
If EmpDynaset.EOF = True Then
MsgBox WarnLastEmp$
EmpDynaset.MoveLast
End If
Call EmpRefresh
End Sub