EJERCICIO 49

Capturar un número cualesquiera e informar si es o no es mayor de 100

' Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button3_Click()

QUIT

END

PUBLIC SUB Button2_Click()

TextBox1.Text = ""

END

PUBLIC SUB Button1_Click()

DIM A AS Integer

A = TextBox1.Text

IF A > 100 THEN

Message("EL NUMERO ES MAYOR")

ELSE

Message(" EL NUMERO ES MENOR")

END IF

END