Forms, blank entry

S

Sibes

I have a minor problem I can not seem to solve.

here is the code i have for find next
Private Sub cmdNextChild1_Click()
On Error GoTo Err_cmdNextChild1_Click


DoCmd.GoToRecord , , acNext

Exit_cmdNextChild1_Click:

Exit Sub

Err_cmdNextChild1_Click:
DoCmd.GoToRecord , , acFirst

End Sub

this finds the next record, then loops back to the first record. However,
before it will back to the first record, it shows a blank record.

I would like to know if there is a way for the blank record not to show and
have it looped back to the first record?

Thanks in advance..

Lisa
 
O

Ofer

You have a blank record because the AllowAddition property of the form is set
to yes, if you don't want this blank line set it to No
 
Top