bisa taruh breakpoint di code me!no dst itu, lalu jalankan. nanti VB akan berhenti dan anda bisa menekan F8 utk Step-by-Step ngejalanin code. test nilai yg dikandung variable. Kalau string ditambahin ya hasilnya 1 melulu.
hati-hati juga menggunakan variabel yg udh dipakai sbg keyword No sebaiknya diganti dengan nomor (misalnya) karena No sendiri merupakan internal constant bagi akses, nilainya = 0. Haer 2009/2/12 buday uhuy <[email protected]> > Temans accesser.. > > Saya buat coding untuk membuat nomor detail transaksi di subform otomatis > bertambah, tapi kenapa no nya tetap 1 ya ? > > Private Sub Form_BeforeInsert(Cancel As Integer) > > Me!no = Nz(DMax("no", "restdt", "koderest='" & Me!koderest & "'"), 0) + 1 > > Apa ada yang kurang di coding itu ? atau mungkin ada yg perlu di tambahkan > di event yang lain ? > > Mohon bantuan dari teman2 semua. > > Sebelumnya terima kasih > > Salam > Budi > > > ------------------------------ > New Email names for you! > <http://sg.rd.yahoo.com/aa/mail/domainchoice/mail/signature/*http://mail.promotions.yahoo.com/newdomains/aa/> > Get the Email name you've always wanted on the new @ymail and @rocketmail. > Hurry before someone else does! > > > -- [Haer Talib] MVP Office Access Meet me at www.RumahAccess.com =>
