Public Enum Colors
Black = 0
White = 1
Green = 2
End Enum
How Can I then list these values in a combobox?
for n = 0 to 2
select case n
case Black : strRS = strRS & "Black;"
case White : strRS = strRS & "White;"
case Green : strRS = strRS & "Green;"
end case
next n
' chop off last semicolon & put into combo box
cboMyCombo.RowSource = Left(strRS, Len(strRS)-1))
Still think it's a bit redundant though...
HTH
Tim F