Código fonte (Calculadora de decimo terceiro salário)

Componentes necessários

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

Código:


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