EJERCICIO 52

OPERACIONES UTILIZANDO 4 FRAME : SUMA ,RESTA,MULTIPLICACIÓN Y DIVISIÓN.

Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

 

PUBLIC SUB Button1_Click()

  TextBox3.TEXT = Val(TextBox1.TEXT) + Val(TextBox2.TEXT)
  TextBox6.TEXT = Val(TextBox4.TEXT) - Val(TextBox5.TEXT)
  TextBox9.TEXT = Val(TextBox7.TEXT) * Val(TextBox8.TEXT)
  TextBox12.TEXT = Val(TextBox10.TEXT) / Val(TextBox11.TEXT)
END

BORRAR

PUBLIC SUB Button2_Click()

TextBox1.TEXT = " "
TextBox2.TEXT = " "
TextBox3.TEXT = " "
TextBox4.TEXT = " "
TextBox5.TEXT = " "
TextBox6.TEXT = " "
TextBox7.TEXT = " "
TextBox8.TEXT = " "
TextBox9.TEXT = " "
TextBox10.TEXT = " "
TextBox11.TEXT = " "
TextBox12.TEXT = " "
END

SALIR

PUBLIC SUB Button3_Click()

  QUIT

END