how to limit number of records displayed in subform in access 2007

[neelsfer]

i want to limit the capturing in a subform to the first 10 records. Pls help

mainform = racesetupf (table name =racesetup)
fields = racesetupid(autono)
racename(txt); racedate(short)

Subform = RaceTimingSF
Table = RacetimingT
RacetimingId (autonumber)
Finishseq (number)
RaceNo (number)
Racedate (date)
Racename (txt)

The finishseq field adds a sequential number every time a raceno is captured.
What i need is an statement such as "If the value of finishseq =10, then close access. The code in the "beforeinsert" of the subform is
FinishSeq = Nz(DMax("FinishSeq", "RacetimingT")) + 1

pls help

[gnawoncents]

I think I understand what you're trying to do. See if the code below works and let me know.

Private Sub Form_BeforeInsert(Cancel As Integer)
 
FinishSeq = Nz(DMax("FinishSeq", "RacetimingT")) + 1
 
If FinishSeq = 10 then
  cancel = true
End If
 
End Sub 

[neelsfer]

thx a million

[neelsfer]

just before i got your message, i stumbled across this code that works and is very similar

If Me.Finishseq <10 Then
MsgBox "Maximum records already saved. No more may be added.", vbOKOnly
Cancel = True
Me.Undo
End If