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

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