Olá pessoal !
Sou iniciante em VB. Preciso fazer um trabalho que é uma calculadora básica. Consegui somar e diminuir, porém não consigo multiplicar de jeito nenhum.
Este é o Evento do botão +
Private Sub btMais_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btMais.Click
operacao = "+"
valor = valor + Integer.Parse(Entrada.Text)
Entrada.Text = ""
Entrada.Focus()
End Sub
Este do botão de Multiplicação
Private Sub btX_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btX.Click
operacao = "*"
valor = (valor) * Entrada.Text
Entrada.Text = ""
Entrada.Focus()
End Sub
Alguém pode me ajudar por favor, tentei de várias maneiras e não consegui…
Desde ja agradeço pela atenção
Obrigado.
O que está funcionando é este aqui:
valor = valor + Integer.Parse(Entrada.Text)
...
O que não funciona é este aqui:
valor = (valor) * Entrada.Text
Qual é a diferença? Fica a seu cargo descobrir a diferença.
valor = (valor) * Entrada.Text
o resultado sempre da zero …
pq ???
Porque você nunca reparou em uma calculadora de verdade.
Se você reparou bem em uma calculadora de verdade, o sinal de “X” não faz a multiplicação na hora.
A tecla de X (multiplicação) não faz a multiplicação “na hora”; ela indica que quando você teclar o sinal de “=”, ou então quando você teclar um sinal de “+”, “-”, “X” ou “/” depois de você entrar com o segundo número, aí que você tem de fazer a tal multiplicação.
Consegui resolver meu problema 
Na verdade eu tinha que fazer uma verificação de que se a operação tinha ou não sido feita
If (Not operacao Is Nothing) Then
valor = Integer.Parse(Entrada.Text) * valor
Else
valor = Integer.Parse(Entrada.Text)
End If
Porque ele estava reconhecendo o primeiro valor como zero
Mesmo assim muito obrigado pela ajuda
Abraço
Nessa calculadora eu tentei simular uma de verdade…