Color fuente dependiendo de rangos decimales en textbox

[hiddenmafia]

Buenas tardes estimados programadores,

Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme.

Como lo indico, lo que requiero es lo siguiente 

Tengo un TextBox15 en el cual una vez se le hace clic arroja un numero decimal en formato "0.##0" en el mismo textbox, este numero decimal sale despues de restar 2 fechas del mismo formulario.

Ahora bien, la ayudita que quiero es que dependiendo del rango decimal le ponga un color u otro, de la siguiente manera

si es >= 0.333 ponga el color del forecolor del textbox15 rojo

si es > 0.166 y <0.333 ponga el forecolor en amarillo

si es < de 0.166 ponga el forecolor en verde

Agradezco de sobre manera a quien pueda ayudarme.

Link del formulario:

Solicitud Moviles MT 

JAAA

[Antoni]

TextBox15.ForeColor = vbGreen
Select Case CDbl(TextBox15)
   Case Is >= 0.333: TextBox15.ForeColor = vbRed
   Case Is >= 0.166: TextBox15.ForeColor = vbYellow
End Select

 

[hiddenmafia]

Buenas tardes,@Antoni

para el mismo caso pero que los valores sean de "hh:mm:ss"

es decir,

si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo

si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo

si es < de 00:02:00 ponga el forecolor en verde

Como se haría?

 

Gracias amigo por tu ayuda