Realizar un programa que me permita ingresar un numero y muestre un mensaje:

Realizar un programa que me permita ingresar un numero y muestre un mensaje: “esta en el rango de 50 a 60 caso contrario fuera del rango” utilizando la sentencia IF THEN ELSE.

' Gambas class file


PUBLIC SUB _new()
END
PUBLIC SUB Form_Open()
END
PUBLIC SUB Button1_Click()
Dm 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