Como fazer uma calculadora simples no vb.net
Deixa o seu designer assim:
primeiramente bora definir as variáveis globais:
Essas são as variáveis, os números a se somar ficarão armazenados na variável num1 e num2, e o sinal da operação ( + - x / ) ficara armazenado na variável operador.
Agora bora “dar vida” aos sinais ( + – x / )
no botão de + coloque o codigo
Aqui é o botão do mais "+" e quando clicar nele o operador vai mudar para "+" e os numeros que estiver na textbox1 ficara armazenado na variavel num1, e a textbox1.text se limpara. as mesmas coisas abaixo, mais com o operador diferente.
no botão de - coloque o codigo
no botão “/” coloque o codigo:
no botão de “x” coloque o codigo:
Agora a parte que faz “ a magica” o botão do igual “=”, coloque o codigo
ele somara de acordo com o sinal da soma que estiver na variavel operador, por exemplo:
nesse codigo acima, " se o operador for "x", vai somar num1 vezes num2 e aparecera a variavel na textbox1.
Agora chegou a hora um pouco chatinha, “dar vida” aos botões dos numeros, bora la:
No botão do 0 coloque o codigo:
‘Adicionara o numero "0" na textbox1
No botão do 1 coloque o codigo:
‘Adicionara o numero "1" na textbox1
No botão do 2 coloque o codigo:
‘Adicionara o numero "2" na textbox1
e assim em diante até o numero 9,
E no botão da virgula coloque o codigo:
‘Adicionara a virgula "," na textbox1
Terminamos, teste ai, nao esqueça de comentar e tirar suas duvidas ai.
Abraço.
Baixe o projeto: clique aqui
primeiramente bora definir as variáveis globais:
Dim operador As String Dim num1 As Double Dim num2 As Double
Essas são as variáveis, os números a se somar ficarão armazenados na variável num1 e num2, e o sinal da operação ( + - x / ) ficara armazenado na variável operador.
Agora bora “dar vida” aos sinais ( + – x / )
no botão de + coloque o codigo
If TextBox1.Text = "" Then MsgBox("Coloque algum numero") Else num1 = TextBox1.Text operador = "+" TextBox1.Text = "" End If
Aqui é o botão do mais "+" e quando clicar nele o operador vai mudar para "+" e os numeros que estiver na textbox1 ficara armazenado na variavel num1, e a textbox1.text se limpara. as mesmas coisas abaixo, mais com o operador diferente.
no botão de - coloque o codigo
If TextBox1.Text = "" Then MsgBox("Coloque algum numero") Else num1 = TextBox1.Text operador = "-" TextBox1.Text = "" End If
no botão “/” coloque o codigo:
If TextBox1.Text = "" Then MsgBox("Coloque algum numero") Else num1 = TextBox1.Text operador = "/" TextBox1.Text = "" End If
no botão de “x” coloque o codigo:
If TextBox1.Text = "" Then MsgBox("Coloque algum numero") Else num1 = TextBox1.Text operador = "x" TextBox1.Text = "" End If
Agora a parte que faz “ a magica” o botão do igual “=”, coloque o codigo
If TextBox1.Text = "" Then MsgBox("Coloque algum numero") Else num2 = TextBox1.Text If operador = "x" Then 'vezes TextBox1.Text = num1 * num2 End If If operador = "+" Then 'mais TextBox1.Text = num1 + num2 End If If operador = "-" Then 'menos TextBox1.Text = num1 - num2 End If If operador = "/" Then 'dividido TextBox1.Text = num1 / num2 End If End If
ele somara de acordo com o sinal da soma que estiver na variavel operador, por exemplo:
ElseIf operador = "x" Then TextBox1.Text = num1 * num2
nesse codigo acima, " se o operador for "x", vai somar num1 vezes num2 e aparecera a variavel na textbox1.
Agora chegou a hora um pouco chatinha, “dar vida” aos botões dos numeros, bora la:
No botão do 0 coloque o codigo:
TextBox1.Text += "0"
‘Adicionara o numero "0" na textbox1
No botão do 1 coloque o codigo:
TextBox1.Text += "1"
‘Adicionara o numero "1" na textbox1
No botão do 2 coloque o codigo:
TextBox1.Text += "2"
‘Adicionara o numero "2" na textbox1
e assim em diante até o numero 9,
E no botão da virgula coloque o codigo:
TextBox1.Text += ","
‘Adicionara a virgula "," na textbox1
Terminamos, teste ai, nao esqueça de comentar e tirar suas duvidas ai.
Abraço.
Baixe o projeto: clique aqui
0 comentários:
Postar um comentário