Ejercicio 2

“CALCULAR EL ÁREA DE UN CÍRCULO”

' Gambas class file

PUBLIC SUB Button1_Click()

TextBox3.text = (TextBox1.Text) * (TextBox2.Text) * 3.14

Label4.Text = "EL ÁREA DEL CÍRCULO ES:"

END

PUBLIC SUB Button2_Click()

TextBox1.Text = ""

TextBox2.Text = ""

TextBox3.Text = ""

Label4.Text = ""

END

PUBLIC SUB Button3_Click()

FMain.Show

Form2.Hide

END