CalculadoraDeDecimoTerceiroSalario

    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

    Voltar ao Topo