EJERCICIO 50

PUEDE ESCRIBIR LA LETRA "A" "B" Y SE MOSTRARA UN MENSAJE

Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

END

PUBLIC SUB Button3_Click()

QUIT

END

PUBLIC SUB Button2_Click()

TextBox1.Text = ""

END

PUBLIC SUB Button1_Click()

SELECT CASE TextBox1.Text

CASE "a", "A"

Message("AGUILA")

CASE "b", "B"

Message("TIGRES")

CASE ELSE

Message("NO HAY")

END SELECT

END