Skip to main content

AccessTr.neT M.


Vba Hesaplama Formülü Hakkında

Vba Hesaplama Formülü Hakkında

Çözüldü #1
Merhabalar. Aşağıdaki kırmızı kodla hesaplama yaptırdığım ödeme tutarı değerinden 3 adet farklı metin kutusundan girilecek değerlerle txtKalan Değerini hesaplatmak istiyorum siyah alandaki formülü nasıl revize etmeli ve hangi olayın yordamına yazmalıyım.Yardımlarınız için Teşekkür ederim.

Private Sub txtİskonto_Exit(Cancel As Integer)


Me.txtOdemeTutari.Value = Me.txtHesapToplami * ((100 - Me.txtİskonto) / 100)

End Sub

Private Sub txtKalan_AfterUpdate()

Me.txtKalan.Value = txtOdemeTutari - txtNakit - txtKrediKarti - txtYemekCeki

End Sub

Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#2
Sub HesaplamaYap()

Me.txtOdemeTutari.Value = Me.txtHesapToplami * ((100 - Me.txtİskonto) / 100)
Me.txtKalan.Value = txtOdemeTutari - txtNakit - txtKrediKarti - txtYemekCeki
End Sub

Şeklinde kod ekleyin, txtNakit, txtKrediKarti txtYemekCeki şeklindeki hesaplamada bulunan metin kutularının güncelleştirme sonrasında olayına

call HesaplamaYap

kodu ekleyin.

"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
...........
#3
Son Düzenleme: 16/01/2019, 18:38, Düzenleyen: Oğuz Türkyılmaz.
(16/01/2019 17:52)ozanakkaya Adlı Kullanıcıdan Alıntı: Sub HesaplamaYap()

Me.txtOdemeTutari.Value = Me.txtHesapToplami * ((100 - Me.txtİskonto) / 100)
Me.txtKalan.Value = txtOdemeTutari - txtNakit - txtKrediKarti - txtYemekCeki
End Sub

Şeklinde kod ekleyin, txtNakit, txtKrediKarti txtYemekCeki şeklindeki hesaplamada bulunan metin kutularının güncelleştirme sonrasında olayına

call HesaplamaYap

kodu ekleyin.
[Resim: do.php?img=8704]
Bu şekilde düzenleyerek iskonto alanından çıktığım anda istediğim sonucu aldım. Teşekkür ederim.
[Resim: do.php?img=8705]

Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da