Variable al estilo System.Drawing.Color

Hola, tengo un objeto que puede adoptar distintos valores y me gustaría crear
algo similar a la estructura Color de VS2005, en la que podemos poner:
Dim MiColor as Color = (...) y al poner el signo de igual IntelliSense
muestra una lista de valores como si fuera una enumeración.

Quiero hacer esto exactamente igual que lo hace por tanto
System.Drawing.Color.

¿Alguien puede ayudarme? Un saludo.