[Resolvido]Trocar cor status

Ola pesoal,nesse exemplo ai quero que quando trocar o status na combo,mudar a cor da cx texto .
Como faço essa formatação condicional.

Boas.....

Algo parecido com isso.

Private Sub Status_AfterUpdate()
Select Case Me.Status.Column(0)
Case Is = "autorizado"
Me.CorStatus.BackColor = vbRed
Case Is = "orçamento"
Me.CorStatus.BackColor = vbBlack
Case Is = "Em andamento"
Me.CorStatus.BackColor = vbGreen
End Select
End Sub

Caso, precise de mais cores, sugiro usar o RGB, algo parecido com o evento abaixo.
Me.CorStatus.BackColor = RGB(123.255.278)

Abraços

Grande Silvio,muito obrigado valeu mesmo.

Boas, o fórum agradece o retorno.