arkadaşlar alt form sıra numarası kodu yıllardır kullanıyorum ama son 1 aydır bir hata var hata veriyor.
1
2
3
4
sıralıyor yrni kayıtta hata yazoyor
hata ekranının resmini yolluyorum

---

[Resim: https://resim.accesstr.net/uploads/13306298311.jpg]

alt formda LineNumber kodu arıza yapınca aşağıdaki kodu yazdım yine hata veriyor sizde hata veriyormu bana yazarmısınız.
bir örnek yolluyorum
düzgün çalışırsa kullanırız


[vb]Option Compare Database
'Bu Haliyle Çalışıyor Ama Form Yüklenince Otomatik vermesini isteyince yeni kayda gidiyor ve hata veriyor
Private Sub Komut65_Click()
Dim i As Long
If Status <> acDeleteOK Then Exit Sub

With Me.Recordset
.MoveLast
For i = .RecordCount To 1 Step -1
.Edit
'AltFormda SıraNo Metin