“CALCULAR
EL ÁREA DE UN TRIÁNGULO”
'
Gambas class file
PUBLIC
SUB Button1_Click()
TextBox3.Text =
CInt(TextBox1.text * TextBox2.Text / 2)
Label4.Text = "EL
ÁREA DEL TRIÁNGULO ES:"
END
PUBLIC
SUB Button2_Click()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
Label4.Text = ""
END
PUBLIC
SUB Button3_Click()
FMain.Show
Form3.Hide
END
No hay comentarios:
Publicar un comentario