(13/04/2012, 14:16)C*e*l*o*y*c*e yazdı: Private Sub Komut17_Click()
DoCmd.GoToRecord , , acNewRec
kazano = Nz(DMax("[kazano]", "kazakayıt"), 0) + 1
End Sub

bunu denermisiniz

çok teşekkür ederim sayın celoyce..istediğim gibi numaralandırma yapıyor...repinizi gönderdim..

sorunum çözülmüştür..