Skip to main content

AccessTr.neT


Textbox matematiksel işlem ve para formatı

Textbox matematiksel işlem ve para formatı

Çözüldü #1
Kod:
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        On Error Resume Next
        Dim para As Single
        para = CSng(TextBox3.Text)
        para = CSng(TextBox5.Text)
        para = CSng(TextBox6.Text)

        TextBox3.Text = para.ToString("N")
        TextBox3.Text = TextBox1.Text * TextBox2.Text
        TextBox5.Text = para.ToString("N")
        TextBox5.Text = TextBox3.Text * TextBox4.Text / 100
        TextBox6.Text = para.ToString("N")
        TextBox6.Text = TextBox3.Text - TextBox5.Text
    End Sub

Bu kod ile textboxlara girdiğim değerlere matematiksel işlem yaptırıyorum.

TextBox1.Text = 123 (Tonaj)

TextBox2.Text = 0,650 (Birim Fiyat)

TextBox4.Text = 2 ( Stopaj Oranı)

Yukarıdaki hesaplamaya göre çıkan sonuç

TextBox3.Text = 79,95

TextBox5.Text = 1,599

TextBox6.Text = 78,351

Bu kod ile virgden sonra 3 hane yapmasının önne geçemedim

Sonuç aynen şöyle olmalı

TextBox3.Text = 79,95

TextBox5.Text = 1,60

TextBox6.Text = 78,35


Bide Form2 de datagridden seçilen veriyi düzeleme işleminde bir yerde hata yapıyorum onu çözemedim
muko.rar

Teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Textbox matematiksel işlem ve para formatı - Yazar: drummers - 14/04/2012, 22:58
Task