none
multiplicar text box RRS feed

  • Pergunta

  • Bom dia.

    preciso multiplicar o valor de uma textbox por outra e apresentar o valor em uma terceira.

    frmSaida.txtTotal.Text = (frmSaida.txtQtde.Text * frmSaida.txtValor.Text)

    Só que dessa forma não está retornando o valor da multiplicação. Preciso converter os valores? como ficaria?

    Obrigado.


    quarta-feira, 5 de março de 2014 12:51

Respostas

  • Olá Paulo!

    Ele não está retornando, justamente porque o .text é um retorno do tipo String.

    Você pode ter 3 tipos de conversão e resultado.

    1º - Inteiro
    2º - Decimal
    3º - Duplo

    Para todos os casos, faça a conversão antes da leitura do texto.
    Exemplo:

    'Recebe valores Inteiros e Multiplica. Resultado Inteiro
    
    frmSaida.txtTotal.Text = (System.Convert.ToInt32(frmSaida.txtQtde.Text) * (System.Convert.ToInt32(frmSaida.txtValor.Text))
    
    
    'Recebe valores Decimais e Multiplica. Resultado Decimal
    
    frmSaida.txtTotal.Text = (System.Convert.ToDecimal(frmSaida.txtQtde.Text) * (System.Convert.ToDecimal(frmSaida.txtValor.Text))
    
    
    'Recebe valores Duplos e Multiplica. Resultado Duplo
    
    frmSaida.txtTotal.Text = (System.Convert.ToDouble(frmSaida.txtQtde.Text) * (System.Convert.ToDouble(frmSaida.txtValor.Text))

    Ou melhorando a disposição e organização, que facilita num cálculo futuro de qualquer operação:
    (Segue a regra do tipo de número: Inteiro ou Decimal ou Duplo)

    Dim DQtd As System.Double
    Dim DValor As System.Double
    Dim DResultado As System.Double
    
    
    DQtd = System.Convert.ToDouble(frmSaida.txtQtde.Text)
    DValor = System.Convert.ToDouble(frmSaida.txtValor.Text)
    
    DResultado = DQtd * DValor
    
    frmSaida.txtTotal.Text = DResultado.ToString()

    At

    Alan

    • Marcado como Resposta Paulo Romeiro quinta-feira, 6 de março de 2014 13:34
    quarta-feira, 5 de março de 2014 13:17