| Facebook ile Bağlan | Twitter İle Bağlan | Google+ İle Bağlan

access hesaplama yardım

wave41

Access Cevaplanmış Soruları

5356

05/04/2011, 15:11 #6

Onursal Üye

Coskun0559

Bul

Onursal Üye

Adı Soyadı: Co.... ÇA....

Yaşı: 39

Konum: Tekirdağ

Ofis Versiyonu: -

Son Oturumu: 20/02/2024,18:22

Yorumları: 1.221

Konuları: 99

Kayıt Tarihi: 02/11/2008

Teşekkür Puanı: 519

örneğinize 1 adet form ekledim.
sorguyu güncelleştirme sorgusu yaptım fakat bazı kayıtlarınızda psf fiyatları ve iskonto oranları girilmediği için(boş olduğu için) kamu fiyatını hesaplamaz.
hesaplama yapmak için 1 adet buton ekledim
kodu:

Private Sub Komut69_Click()

Dim hesapla

If IsNull(Me.PSF) Then MsgBox "PSF FİYATI GİRMEDEN DEVAM EDEMEZSİNİZ", vbOKOnly, "E K S İ K B İ L G İ": Me.PSF.SetFocus: Exit Sub

If IsNull(Me.ISKONTO_ORANI) Then MsgBox "İSKONTO ORANI GİRMEDEN DEVAM EDEMEZSİNİZ", vbOKOnly, "E K S İ K B İ L G İ": Me.ISKONTO_ORANI.SetFocus: Exit Sub

hesapla = Me.PSF.Value * Me.ISKONTO_ORANI.Value / 100

Me.KAMU_FİYATI.Value = hesapla

End Sub

*Lütfen olumlu yada olumsuz geri dönüş yapınız.*
örneği inceleyiniz.

ornek_coskun.rar (Dosya Boyutu: 532,24 KB | İndirme Sayısı: 17)

GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !

Cevapla