Esta sencillo, no te compliques, tienes la logica, ahora simplemente hazlo.
En tiempo de diseño deja el Verde encendido y los otros apagados, luego...
En el evento click del boton escribe el codigo que tienes en mente:
Cita: Inicio Evento Click
if Shape_Verde.Visible = True then '<-- si esta el Verde prendido
Shape_Verde.Visible = False '<----- lo apagas
Shape_Amarillo.Visible = True '<--- prendes el amarillo
else if Shape_Amarillo.visible = True then '<-- si esta el Amarillo prendido
Shape_Amarillo.Visible = False '<----- lo apagas
Shape_Rojo.Visible = True '<--- prendes el Rojo
else if Shape_Rojo.visible = True then ' <-- si esta el Rojo prendido
Shape_Rojo.visible = false '<--- lo apagas
Shape_Verde.VIsible = True '<--- prendes el Verde
end if
Fin Evento Click
Es importante que utilizes Else If, en lugar de If porque si no se te cicla el programa.
Es lo que te entendi, espero te sirva, el codigo adecualo al Lenguaje de Visual Basic, me parece que es algo similar.