textboxlarda dört işlem ve format sorun

[tahiroglu]

herkese selamlar...formda epey aradım ama bazı dosyların arşivden silinmesinden dolayı ulaşamadım...

sorum textboxlarda excelde formülleme ile yaptığımız gibi aynı anda çarp böl topla gibi işlemleri nasıl yapabiliriz..ayrıca formatını örnek olarak 1.255,16 gibi nasıl yapabiliriz...ben bazı uygulamalar yapmaya çalıştım ama virgülden sonra çok fazla rakam çıkıyor...dosya ekli

ilgilenen tüm arkadaşlara teşekkür ederim...iyi çalışmalar

 

[Ayhan Ercan]

Merhaba
Örnek dosyanızdaki butonun kodlarını aşağıdaki gibi değiştirerek deneyiniz..

Private Sub CommandButton1_Click()
TextBox2.Text = Format(CDbl(TextBox1.Value) / 30 * 2, "#,##0.00")
TextBox3.Text = Format(CDbl(TextBox1.Value) / 4, "#,##0.00")
End Sub

 

[tahiroglu]

teşekkürler

sayın ayhan ercan bu hızlı ve çözüme kavuşan cevabınız için çok teşekkür ederim...iyi çalışmalar...:dua2:

 

[Ayhan Ercan]

sayın ayhan ercan bu hızlı ve çözüme kavuşan cevabınız için çok teşekkür ederim...iyi çalışmalar...:dua2:

Rica ederim.
İyi Çalışmalar...