Syntax:
[ | Private | Public ] Enum name
[...]
End Enum
Group: Declaration
Description:
Define a new userenum. Each
elem defines an element of the
enum. If value is given then
that is the element's value. The value can be any constant integer expression.
If value is omitted then the
element's value is one more than the previous element's value. If there
is no previous element then zero is used.
Enum defaults to Public
if neither Private
or Public is specified.
Example:
Enum Days
Monday
Tuesday
Wednesday
Thursday
Friday
Saturday
Sunday
End Enum
Sub
Main
Dim D As Days
For D = Monday
To Friday
Debug.Print
D ' 0 through 4
Next D
End Sub