Sub cmdFirst_click()
rsStudents.MoveFirst
End Sub
Sub cmdLast_Click()
rsStudents.MoveLast
End Sub
Sub cmdPrevious_Click()
rsStudents.MovePrevious
' Check to see if tried to move prior to the first record
If rsStudents.BOF then
' Moved prior to the first record
' Set the user back to the first
rsStudents.MoveFirst
End If
End Sub
Sub cmdNext_Click()
rsStudents.MoveNext
' Check to see if tried to move beyond the last record
If rsStudents.EOF then
' Moved beyond the last record
' Set the user back to the last
rsStudents.MoveLast
End If
End Sub