Visual Basic - Añadir colores vb

Hola a todos, estoy intentando cambiar el color de una etiqueta según lo que escoja el usuario en un ColorDialog, el problema está en que al poner:

Label2.ForeColor = ColorEscogido

no me lo reconoce, creo que había que añadir el color a la lista primero, pero no encuentro como hacerlo, ¿Alguna sugerencia?

Sí me funciona así : Label2.ForeColor= ColorDialog1.Color, pero estoy mas interesado en la otra forma.

Gracias de antemano, un saludo

Proba de agregar tres scrollbars, pone la propiedad max de cada uno en 255
y copia este codigo.

Private Sub ScrollBar1_Change()
Label1.BackColor = RGB(ScrollBar1.Value, ScrollBar2.Value, ScrollBar3.Value)
End Sub

Private Sub ScrollBar2_Change()
Label1.BackColor = RGB(ScrollBar1.Value, ScrollBar2.Value, ScrollBar3.Value)
End Sub

Private Sub ScrollBar3_Change()
Label1.BackColor = RGB(ScrollBar1.Value, ScrollBar2.Value, ScrollBar3.Value)
End Sub

podria ser la alternativa al commondialog