Thursday, July 20, 2006

Clase del 14/7 (por Sebastian G.)

Seguimos progrmando el control pero ahora modificamos algunos botones:
ON/OFF
sub_botonon_click ()
if onoff.backcolor = aaaa then
onoff.backcolor = bbbb
botontv.enabled = true
else
onoff.backcolor = aaaa
botontv.enabled = false
End if
End sub

Esto sirve para que si la tv esta pagada se bloqueen todos los botones menos el on/off y si esta prendida los habilita.

CANAL MAS/CANAL MENOS
sub_canalmás_click ()
if canal.caption >12 then
canal.caption = 1
else
canal.caption = val (canal.caption) +1
End if
End sub
Esto sirve para que loscanales vallan del 1 al 13.

0 Comments:

Post a Comment

<< Home