Incremental values in Orders form

[Syphonics via AccessMonster.com]

I had a Orders form for me to key in the data for the particular orders into
my order table.
I had a field call the "InvoiceID".
The order form allows me to key in the InvoiceID. Now i want to have a button
to allows me to increase the values in the InvoiceID by 1.
But each time i go for a new order, it is a new record, all the values in the
order form is "null". How do i retrieve the InvoiceID value from the previous
record.

 

[Allen Browne]

Use the BeforeInsert event procedure of the form to look up the highest
number used so far, and add 1.

The code will be something like this:

Private Sub Form_BeforeInsert(Cancel As Integer)
Me.InvoiceID = Nz(DMax("InvoiceID", "Orders"),0) + 1
End Sub