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

DIM A AS Integer
A = TextBox1.Text
IF A > 100 THEN
Message("EL NUMERO ES MAYOR")
ELSE
Message(" EL NUMERO ES MENOR")
END IF
 para salir
quit