immagini su una picturebox immagino, basta cambiare l'immagine invece che il colore
aggiungi alle risorse(esplora soluz\risorse\aggiungi file esistenti)
le tre immagini:
bollino rosso,verde,grigio(per il lampeggio)

codice:
sub trackbar1_valueChanged(.....
timer1.interval=trackbar1.value
end sub

sub T1_tick(.....
if ptb1.image=my.resource.ImmagineGrigia then 'il nome del immagine con il bollino grigio
if Rosso=true then 'variabile che indica se il led deve essere rosso o verde, ovviamente devi impostarne il valore nel codice
ptb1.image=my.resource.immagineRossa
else
ptb1.image=my.resource.immagineVerde
end if
end sub
 :unz: