Record navigation (in database/recordset)
******************************************************************************************************
Public Function FirstRecord()
DoCmd.GoToRecord Record:=acFirst ' The first record
End Function
Public Function PreviousRecord()
DoCmd.GoToRecord Record:=acPrevious ' The previous record (check to ensure that you're not at the BOF mark)
End Function
Public Function NextRec()
DoCmd.GoToRecord Record:=acNext ' The next record (check to ensure that you're not at the EOF mark)
End Function
Public Function LastRec()
DoCmd.GoToRecord Record:=acLast ' The last record
End Function
Public Function NewRec()
DoCmd.GoToRecord Record:=acNew ' A new record is added
End Function
|