I know you can get the integer value of an enum by using (example per the LR)
Dim levelInt As Integer
levelInt = Integer(SecurityLevel.Minimal) ' levelInt = 1
but is it possible to assign your own values?
I have a use case where I need a few different enums, but would like to assign unique values to each member
right now I have to use SELECT CASE to convert them
select case enumName
case enumvalue1
x=432
case enumvalue2
x=519
case enumvalue3
x=809
end select
it would be create if I could assign those values to the enum, and then
[code]
select case enumName
case enumvalue1
x=Integer(enumName.enumvalue1)
case enumvalue2
x=Integer(enumName.enumvalue2)
case enumvalue3
x=Integer(enumName.enumvalue3)
end select
i realize the Select/Case remains, but I only have to worry about the Integer Value in ONE place