textboxda eğer kullanma

[sirkülasyon]

eğer textbox23' e 8 rakamı girilirse
textbox27= textbox23*0,00948
eğer textbox23' e 0 rakamı girilirse
textbox27= textbox25*0,00948
olarak işlem nasıl yaptırabilirim? Yardımınız için teşekkür ederim.

 

[vardar07]

Soru sanki biraz eksik gibi .Bu iki işlem dışında başka işlem yapıkmayacaksa aşağıdaki gibi olabilir.

Private Sub TextBox25_Change()
If TextBox23.Value = 8 Then TextBox27.Value = TextBox23 * 0.0098
If TextBox23.Value = 0 Then TextBox27.Value = TextBox25 * 0.0098
End Sub

 

[sirkülasyon]

Sayın vardar07;
Teşekkür ederim

 

[vardar07]

Sayın vardar07;
Teşekkür ederim

Rica ederim işini gördüyse ne mutlu.