ALGORITMOS E IMPLEMENTAÇÕES ⇒ Calculadora básica no Gambas(Visual Basic do Linux)(Código fonte)

[pensadornato]

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

Código: Selecionar todos

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