jueves, julio 13, 2006

Clase del 7/7 (por Mati T.)

En la clase, Guille nos enseñó a programar cosas en el control.
Por ejemplo: los números, el brillo(+ ; -), el canal(+ ; -), el volumen(+ ; -) y el botón Enter.


A continuación los códigos:


Para subir un canal

Sub_canal+_click ()
Canal.caption=valor (canal.caption) +1
End sub


Para bajar un canal

Sub_canal+_click ()
Canal.caption=valor (canal.caption) -1
End sub


Para subir el brillo (mover la tele para arriba)

Sub_brillo+_click ()
Base.top = base.top +100
Pant.top = pant.top +100
End sub


Para bajar el brillo (mover la tele para abajo)

Sub_brillo+_click ()
Base.top = base.top -100
Pant.top = pant.top -100
End sub


Para programar el "1"

Sub_uno_click ()
Aux.caption = aux.capion +"1"
End sub

(Para el resto de los números se cambia el "1" por el número deseado y el "uno" por el mismo número)

"Aux" es un label que Guille nos pidió que creemos para que ahí aparezca el número que tocamos, y toquemos un boton (Enter) para que aparezca en la tele.

Para programar el Enter

Sub_enter_click ()
canal.caption = aux.caption
aux.caption = ""
End sub

Al no haber ningún texto entre medio de las comillas, cuando se presione el Enter, los números que estaban en el Aux se borran. (Para que no se amontonen).

Nada más, saludos!