EJERCICIO 4

Elaborar un programa que me permita ingresar un número y muestre un mensaje: “esta en el rango de 50 a 60 caso contrario fuera del rango” utilizando la sentencia IF
Para desarrollar este programa necesitas tu imaginación para hacerlo puedes utilizar: 2 Button, 1 Text box Y 1 button para salir de la aplicación

‘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 If (A) <= 60 Then
Message ("ANDA ENTRE 50 Y 60")
Else Message (" FUERA DEL RANGO 50 Y 60") 
END 
PUBLIC SUB Button2_Click () Textbox1.text = ""
END PUBLIC SUB Button3_Click ()
QUIT 
END