
Indicaciones
Sub tv on_"click"
on-off.backcolor = vbred
on-off.backcolor = vbred
end sub.
Sub tv off_click
on-off.backcolor = "black"
end sub.
Sub brillo más
pantalla.top=pantalla.top -100
end sub
Sub brillo menos
pantalla.top=pantalla.top+100
end sub
Sub tv.click
tv-catv.caption="tv"
end sub
Sub uno_click
aux canal.caption=auxcanal.caption+"1"
end sub
(igual para los demas números)
Sub enter_click
nrocanal.caption=auxcanal.caption
auxcanal.caption=" "
end sub
Sub más_click
nrocanal.caption=val(nrocanal.caption)+1
end sub
Sub menos_click
nrocanal.caption=val(nrocanal.caption) -1
end sub
No hay comentarios:
Publicar un comentario