none
Soma automatica de TextBox em VB RRS feed

  • Pergunta

  • Ola,

    Preciso que ocorra a soma automaticamente: TextBox1 + TextBox2 + TextBox3 + TextBox4 = TextBox5.

    Os valores são inseridos através de botões que contam "+1" e não por digitação.

    Meu código esta fazendo isso, porem para que ele faça o calculo, tenho que selecionar o TextBox5 (Total). Preciso que ele faça sem ter que seleciona-la com o cursor, simplesmente adicionando os valores através dos botoes e ele já fazendo a soma.

    CÓDIGO QUE ESTOU USANDO:

    Private Sub ValorTotalPDTextBox_LostFocus(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox5.LostFocus
            'Soma do total nas textbox
            TextBox5.Text = Val(TextBox1.Text) + Val(TextBox2.Text) + Val(TextBox3.Text) + Val(TextBox4.Text)
    End Sub

    Obrigado.


    segunda-feira, 9 de outubro de 2017 16:56

Todas as Respostas

  • "Preciso que ele faça sem ter que seleciona-la com o cursor..."

    Isso acontece pq vc está utilizando esse evento para atualizá-lo.

    Altere para o evento click do botão.


    Douglas Moura | Cuiabá-MT

    segunda-feira, 9 de outubro de 2017 17:15