Limitar valores de una variable?

[erbuson]

Releyendo con calma tu mensaje veo que si es esto lo que tu quieres, pero que quieres hacerlo con tus colores personalizados.

Esto se consigue con el Enum. Este ejemplo está copiado de la Ayuda de VB

Public Enum InterfaceColors
icMistyRose = &HE1E4FF
icSlateGray = &H908070
icDodgerBlue = &HFF901E
icDeepSkyBlue = &HFFBF00
icSpringGreen = &H7FFF00
icForestGreen = &H228B22
icGoldenrod = &H20A5DA
icFirebrick = &H2222B2
End Enum

Entonces, tu defines el Sub de la siguiente manera, mas o menos como antes te decía:

Private Sub Colorear(Byval QueColor As InterfaceColors)
Label1.BackColor = QueColor
End Sub

y voilá, cuando escribas el Call Colorear( te aparecerá la lista que pides.

Saludos y disculpa por no habértelo explicado bien a la primera de cambio, porque lo de Visual Basic nos 2 por default solo los 2 valores no lo había acabado de pillar.