ALGORITMOS E IMPLEMENTAÇÕES ⇒ Calculadora de decimo terceiro salário no Gambas(Visual Basic do Linux)(Código fonte)

[pensadornato]

Componentes necessários

Textbox1=Textbox1 (Número1)
Textbox2=Textbox2(Número2)
Textbox3=Textbox3(Resultado)
Button1=Calcular
Button2=Apagar
Button3=Sair

Código: Selecionar todos

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Calcular_Click()

  Textbox3.Text = Val(Textbox1.Text) * Val(Textbox2.Text) / 12

END

PUBLIC SUB Apagar_Click()

  Textbox1.Text = ""
  Textbox2.Text = ""
  Textbox3.Text = ""
  

END

PUBLIC SUB Sair_Click()

  ME.Close

END