1er código. ¿En qué fallo?

hola. Empiezo ahora,y con problemas.......
código
private sub azul_click ()
color.text = "azul"
end sub
private sub salir_click()
end
end sub
en teoría en cuando clico (click) en el botón azul, en el TEXBOX,tendría que salir el nombre AZUL,supongo yo.Pues esto no me ocurre,sin embargo en cuando clico(click) en el botón salir,salgo del programa.

gracias