Soru işlem sonucunu yuvarlama hatası?

[s.savas]

Merhaba arkadaşlar.
Aşağıdaki kod bloğu ile gelmesi gereken sonuç 152,21 dir.
Ancak resimde de görüldüğü üzere sonuç 1522125 olarak çıkıyor.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
matrah = CDbl(TextBox29) * 12
oran = CDbl(TextBox1)
çarpan = CDbl(TextBox30)
TextBox16 = Round((matrah * oran * çarpan / 12), 2)
End Sub

 

[mahmut011]

Merhaba
oran ve çarpan yüzde olması gerektiği için(15 ve 50)

TextBox16 = Round((matrah * oran / 100 * çarpan /100 / 12), 2)

doğru sonucu verebilir.

 

[s.savas]

Merhaba
oran ve çarpan yüzde olması gerektiği için(15 ve 50)

TextBox16 = Round((matrah * oran / 100 * çarpan /100 / 12), 2)

doğru sonucu verebilir.

Teşekkür ederim arkadaşım biraz önce bende aynı yöntemle çözdüm.
TextBox16 = Round((matrah * oran / 100) * çarpan / 100 / 12, 2)