AJUDA COM SOMA DE VALORES
Tenho duas textbox que esta recebendo valores que contem centavos 9,50 gostaria de somar esses valores alguem tem algum exemplo de como fazer isso já vi vários exemplos mais sempre não soma os centavos.
Dim resultado As Double
resultado = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
MessageBox.Show(CStr(resultado))
Adicione uma label
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
End Sub
End Class
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
End Sub
End Class
Ambas as dicas dadas excluim o 9,0 o zero final....Alguem saberia outra forma de fazer isso?
é só fazer a formatação das casas decimais.
Abaixo tem dois tipos de formatação.
Abaixo tem dois tipos de formatação.
Dim resultado As Double
resultado = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
MessageBox.Show(CStr(FormatNumber(resultado)))
MessageBox.Show(CStr(FormatCurrency(resultado)))
Vou testar...
Tópico encerrado , respostas não são mais permitidas