martes, 8 de febrero de 2011

EJERCICIOS 1

Realizar 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 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

No hay comentarios:

Publicar un comentario