Usuário com melhor resposta
Como posso programar uma textbox para somar valores de várias textbox?

Pergunta
-
eu já tentei: textboxtotal.text = Cdbl(textbox1.text)+Cdbl(textbox2.text)+Cdbl(textbox3.text)+... mas n funcionou, e sim os resultados das textbox são em formato double por isso coloquei o Cdbl
já tentei tb criar variáveis, ex: val1, val 2, val3 e botei val1 = Cdbl(textbox1.text) e assim por diante, e tentei somar essas variáveis nessa textboxtotal mas n funcionou também! alguém tem alguma ideia?
Respostas
-
Boa noite, bom se eu entendi bem vc quer somar ++++ e as "TextBoxs" são Double, faça desta forma.
Codigo
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim Total1 As Double = Convert.ToDouble(Me.TextBox1.Text) Dim Total2 As Double = Convert.ToDouble(Me.TextBox2.Text) Dim Total3 As Double = Convert.ToDouble(Me.TextBox3.Text) Dim TotalFinal As Double = (Total1) + (Total2) + (Total3) MsgBox(TotalFinal) End Sub End Class
Foto
Lembrando que double usa ",,," virgula, não ponto "...." 10,50 não 10.50
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 1 de agosto de 2018 19:27
Todas as Respostas
-
-
Eu tentei, mas nada :(, porque ele diz que é redundante usar o cdbl porque o texto da textbox já e um tipo de dado double... ai não sei porque não somaria diretamente
- Editado Gustavo Nikov quarta-feira, 20 de junho de 2018 22:11
-
-
Boa noite, bom se eu entendi bem vc quer somar ++++ e as "TextBoxs" são Double, faça desta forma.
Codigo
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim Total1 As Double = Convert.ToDouble(Me.TextBox1.Text) Dim Total2 As Double = Convert.ToDouble(Me.TextBox2.Text) Dim Total3 As Double = Convert.ToDouble(Me.TextBox3.Text) Dim TotalFinal As Double = (Total1) + (Total2) + (Total3) MsgBox(TotalFinal) End Sub End Class
Foto
Lembrando que double usa ",,," virgula, não ponto "...." 10,50 não 10.50
- Marcado como Resposta Filipe B CastroModerator quarta-feira, 1 de agosto de 2018 19:27
-
-
Boa tarde,
Por falta de retorno essa thread está encerrada.
Se necessário, favor abrir uma nova thread.
Atenciosamente.Filipe B de Castro
Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.