Componentes necessários:
Textbox1=Textbox1(número1)
Textbox2=Textbox2(número2)
Textbox3=Textbox3(resultado)
Button1=Adição
Button2=Subtração
Button3=Multiplicação
Button4=Divisão
Button5=Apagar
Button6=Sair
Testei no Gambas2 do kurumin NG e funcionou.
Textbox1=Textbox1(número1)
Textbox2=Textbox2(número2)
Textbox3=Textbox3(resultado)
Button1=Adição
Button2=Subtração
Button3=Multiplicação
Button4=Divisão
Button5=Apagar
Button6=Sair
Testei no Gambas2 do kurumin NG e funcionou.
Código:
PUBLIC SUB _new() END PUBLIC SUB Form_Open() END PUBLIC SUB Adicao_Click() TextBox3.Text = Textbox1.Text + textbox2.Text END PUBLIC SUB subtracao_Click() Textbox3.Text = Textbox1.Text - Textbox2.Text END PUBLIC SUB Multiplicacao_Click() Textbox3.Text = Textbox1.Text * textbox2.Text END PUBLIC SUB Divisao_Click() Textbox3.Text = textbox1.Text / textbox2.Text END PUBLIC SUB Apagar_Click() Textbox1.Text = "" textbox2.Text = "" textbox3.Text = "" END PUBLIC SUB Sair_Click() ME.Close END
Comment