AccessTr.neT

Tam Versiyon: If-then-else şartını daha kısa nasıl yazabilirim?
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4
Örnek eklerseniz kolay gibi görünüyor ...
Arkadaşlar maalesef örnek ekleyemiyorum. Çünkü form yaklaşık 7 bin küsür kayıt olan ilaç tablosundan 2 bin küsür kayıt olan hasta bilgi tablosundan veri alıyor. O nedenle sadece kodu verdim. Şimdi yukarıda verdiğim örnekten gidersek;
Break pointle programı durduruyorum. Alan49, Alan50,Alan51 ve Alan52 nin değerleri null fakat komut162 tuşu ısrarla true . Nerde hata yapıyorum bir türlü bulamadım. İlgilenen arkaaşlara çok teşekkürler.
Programın yedeğini alın ve tablodaki tüm kayıtları silip sadece formu ekleyin bu şekilde daha kolay olur. Bende düzgün şekilde çalıştı yaptığım küçük örnekte. Eğer kutuya bir değer girdikten sonra silip daha sonra 0.0 yazıyorsanız önceki şartları bozmuş oluyor olabilirsiniz. Nasıl kullandığınızıda görmek lazım.
Kod:
Me.Command162.Enabled = (Not ( (nz(Alan49,"-")="-") or (nz(alan50,"-")=50)) or (Nz(Alan51, "0") = "0") Or (Nz(Alan52, "0.0") = "0.0") ))

Eğer bu alanlar sayısal olsaydı ( Ki anlamadığım bir olay bir veri tabanında neden 70küsur alan olur ve hepsi alan diye başlar, excelden mi transfer edildi) hepsini NZ ile toplar sonra 0'dan büyük mü diye bakardım. Img-grin Tek hamle.

Gerçi ben gene böyle yapmaz ortak bir fonksiyon yazıp parametre olarak bu alanları gönderirdim. Neyse örnek yok, bu kadar anlayabiliyorum Img-grin
Arkadaşlar programı ekliyorum. Allah yardımcınız olsun ben kafayı yemek üzereyim.
Değerli Bilgisayarcı;
Bu veriler *.csv dosyadan alındı. Bu formda bunları tek tek işileyerek accesste hazırladığım tablolara verilerin durumuna göre eklenecek.
Verdiğim kod çalışmadı mı
Sayfalar: 1 2 3 4