martes, 8 de febrero de 2011

EJERCICIO 53

Utilizando 4 frame realizar un programa que contenga el calculo de la potencia de un numero area del circulo transformación de años a meses  transformacion de edad a dias .

Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button1_Click()

TextBox3.text = Val(TextBox1.text) ^ Val(TextBox2.text)
TextBox5.text = 3.14 * Val(TextBox4.text) ^ 2
TextBox7.text = Val(TextBox6.text) * 12
TextBox9.text = Val(TextBox8.text) * 365
END

PUBLIC SUB Button2_Click()

  TextBox1.text = ""
  TextBox2.text = ""
  TextBox3.text = ""
  TextBox4.text = ""
  TextBox5.text = ""
  TextBox6.text = ""
  TextBox7.text = ""
  TextBox8.text = ""
 TextBox9.text = ""  

END

PUBLIC SUB Button3_Click()

  QUIT

END

No hay comentarios:

Publicar un comentario