hi i need this code in form load but i dont know what the code is to put it
in form load im sure one of u guys can quickly answer this lol.

private sub formload?hehe

Dim strNextNumber As String

strNextNumber = Nz(DMax("ID", "General Housing Survey"), 0) + 1

strNextNumber = Me.ID