EJERCICIO 47

 Dado un numero por teclado del 50 al 60 y me despliegue un mensaje que diga dentro del rango caso contrario fuera de rango.

Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button1_Click()

  DIM A AS Integer
  A = TextBox1.Text
  IF A > 50 AND A < 60 THEN
  Message("DENTRO RANGO ")
ELSE
Message("FUERA RANGO ")
ENDIF

ENDPUBLIC SUB Button2_Click()
QUIT

END

PUBLIC SUB Button3_Click()
TextBox1.TEXT = ""

END