martes, 8 de febrero de 2011

EJERCICIO 48

PROGRAMA UTILIZANDO LA SENTENCIA IF QUE PERMITA SABER SI UN ALUMNO APRUEBA O REPRUEBA



Gambas class file

PUBLIC SUB Button1_Click()

DIM X AS Integer
X = TextBox1.Text
IF X >= 15 THEN
TextBox2.TEXT = "APROBADO"
TEXTBOX3.TEXT = ""

ELSE
TEXTBOX3.TEXT = "REPROBADO"
TextBox2.TEXT = ""

END IF



END

No hay comentarios:

Publicar un comentario