AccessTr.neT
Form Sayı Değerini Her Kayıtta 1 Arttırma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Form Sayı Değerini Her Kayıtta 1 Arttırma (/konu-form-sayi-degerini-her-kayitta-1-arttirma.html)

Sayfalar: 1 2 3


Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - berduş - 21/02/2020

Private Sub txtUyeNo_Exit(Cancel As Integer)
            txtUyeNo =nz( DMax("nz([uyeno],0)", "[T_1_MemberDefinition]") ,0)+ 1
End Sub
seklinde


Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - Oğuz Türkyılmaz - 21/02/2020

(21/02/2020, 20:46)berduş yazdı:
Private Sub txtUyeNo_Exit(Cancel As Integer)
            txtUyeNo =nz( DMax("nz([uyeno],0)", "[T_1_MemberDefinition]") ,0)+ 1
End Sub
seklinde
Ayni şekilde bu kodda da son numaradan değil arada kullanılmayan ilk değerden başladı neyse boyle kullanayım sorun olmaz herhalde.


Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - Oğuz Türkyılmaz - 21/02/2020

(21/02/2020, 22:10)Oğuz Türkyılmaz yazdı:
(21/02/2020, 20:46)berduş yazdı:
Private Sub txtUyeNo_Exit(Cancel As Integer)
            txtUyeNo =nz( DMax("nz([uyeno],0)", "[T_1_MemberDefinition]") ,0)+ 1
End Sub
seklinde
Ayni şekilde bu kodda da son numaradan değil arada kullanılmayan ilk değerden başladı neyse boyle kullanayım sorun olmaz herhalde.
Pardon kullanılan bir uye numarasını tekrar ekrana getirdi ve hata verdi.1,2,3 10,11,12 uye numaraları kayıtlıydı 10 no'lu kaydı boş şekilde tekrar ekrana getirdi.


Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - berduş - 21/02/2020

txtUyeNo = Nz(DMax("clng(nz([UyeNo],0))", "[T_1_MemberDefinition]"), 0) + 1



Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - Oğuz Türkyılmaz - 22/02/2020

Tamamdır Sn.@berduş halloldu bu şekilde teşekkür ederim.


Cvp: Form Sayı Değerini Her Kayıtta 1 Arttırma - berduş - 22/02/2020

Ilginç bir şekilde sayisal bir alani tekrar sayısala çevirmem gerekti)