pl07 - agregando funciones a los botones

buenas a todos, debido a problemas personales esta clase se demoró, pero aquí ya está.

vamos a ver mas sobre estos condicionales, cosa que nos llevará bastante dolores de cabeza mas de una vez.

 

veamos la sintaxis entonces:

 

sabemos que el if significaba: si

y el then: entonces.

 

sería:

if condicional then

que lo podríamos leer como: si el condicional es válido entonces ejecutemos el código.

y luego finalizamos el if con un EndIf, que indica el final: del if.

 

recordemos en las primeras clases que poníamos en práctica la función MsgBox, que mostraba una ventana con botones.

 

ejemplo probemos este código:

 

MsgBox(4, "bienvenido a mi casa", "¿quieres entrar?")

 

aquí podemos ver los botones si y no. pero como le damos funcionalidades a esos botones?, veamos como hacerlo con los condicionales.

 

la función MsgBox también retorna un valor, que es el valor del botón presionado, cada botón tiene un número, y ese número se puede guardar en una variable, así que vamos a crear la variable $boton para guardar el resultado del botón presionado. vamos a probar el siguiente código:

 

$boton=MsgBox(4, "bienvenido a mi casa", "¿quieres entrar?")

MsgBox(0, "el boton presionado es", $boton)

 

probemos varias veces ese ccódigo, si presionamos el si dará un número, y si presionamos el no dará otro, revisemos cual es.

 

si, están en lo correcto:
el si es el 6
y el no es el 7.

 

tarea 1: probemos con los diferentes MsgBox y veamos que número son los otros botones, el cancelar, el reintentar, el anular y todos los otros botones que aparecen, y hagan una lista con que número es cada botón.

 

ahora vamos a agregarle funcionalidad a esos botones.

 

sabiendo que el si es el 6, podemos poner un condicional para ver si presionó el si mostrarle un mensaje.

 

<inicio del código>

 

; primero preguntamos:
$boton=MsgBox(4, "bienvenido a mi casa", "¿quieres entrar?")

 

; verificamos si presionó el si:
if $boton == 6 then
msgbox(0, "gracias por visitarme", "entra a mi casa")
EndIf

 

<fin del código>

ahí podemos ver que verificamos si el botón es igual a 6, si lo es mostramos un mensaje.

pero si presiona no, no tiene mensaje. así que vamos a hacer este código de vuelta pero con otro condicional para el no.

 

<inicio del código>

 

; primero preguntamos:
$boton=MsgBox(4, "bienvenido a mi casa", "¿quieres entrar?")

 

; verificamos si presionó el si:
if $boton == 6 then
msgbox(0, "gracias por visitarme", "entra a mi casa")
EndIf

 

; verificamos ahora si presionó el no.
if $boton == 7 then
msgbox(0, "bueno, otra vez será", "nos vemos luego")
EndIf

 

<fin del código>

hasta aquí tenemos mucho para probar, ahora le podemos dar funciones al si y al no.

 

tarea 2: hacer un cuento con preguntas, según lo que responda mostrar uno o otro mensaje, y si te animas agregarle sonido.

 

y para finalizar vamos a ver el anterior ejemplo pero ahora agregando un else.

osea, si responde si mostramos un mensaje, el else indicaría si responde el no, ya que el else indica lo contrario de la condición. si la condición valida si es si, lo contrario sería si es no.

 

vamos a ver el ejemplo con el else:

 

<inicio del código>

 

; primero preguntamos:
$boton=MsgBox(4, "bienvenido a mi casa", "¿quieres entrar?")

 

; verificamos si presionó el si:
if $boton == 6 then
msgbox(0, "gracias por visitarme", "entra a mi casa")
else

; si es no: mostramos un mensaje:

MsgBox(0, "bueno, otra vez será", "nos vemos luego")
EndIf

 

<fin del código>

 

ahi mucho para practicar así que mano a la obra!.

 

nota: los que tienen la tutoría paga no habrá clase este jueves, si no el viernes a la misma hora.