Codificación:
.Para que cuando el usuario presione el botón TV se el espacio on/off se ponga rojo:
Sub boton on_ click
onoff. Backcolor= vred
.Para que cuando el usuario presione el botón off el espacio on/off se ponga negro:
Sub boton off_ click
onoff. Backcolor= vblack
.Para que cuando el usuario presione el botón Tv en el espacio tv/catv aparezca la palabra tv:
Sub boton tv_ click
tvcatv. Caption="tv"
.Para que cuando el usuario presione el botón Catv en el espacio tv/catv aparezca la palabra catv:
Sub boton catv_ click
tv/catv. Caption= "Catv"