Calculadora básica no Gambas

Descrição

Esconder código-fonte

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