Visual Basic - Usar un string como "objeto"

Hola a tod@s:

Resumo rápido mi problema

Tengo una variable string llamada color que contiene el literal de un color tal que así:

Dim color as string
color="Red"

Ahora quiero asignar ese color a un label creado dinámicamente tal que pueda hacer

Label1.ForeColor=color

pero esto por supuesto da error y no se como puedo convertir la variable color para evitar tener que hacer para cada color

If color="red" then label1.Forecolor=color.red

If color="blue" then label1.Forecolor=color.blue ....etc ...etc

Muchas gracias!!!!!!

Buenas, según lo que necesites se podria solucionas de una manera u otra.

puedes guardar el color en el tag de la variable y luego asignar el tag en vez del contenido de la variable, otra manera es en un modulo crear una instrucción Enum

Dim colores As Byte

Enum colores
rojo = "0.0.255.0"
Verde = vbGreen
Azul = vbBlue
End Enum

--
'y utilizarla :

Label1.ForeColor = colores.Azul