Question

关于VB中的枚举类型

我正在学习VB的编程
书上面有三段这样的代码

Public Enum Days
sunday
monday
tuesday
wednesday
thursday
friday
saturday
End Enum

Public Enum workdays
sunday
monday
tuesday
wednesday
thursday
friday
saturday
invalid = -1
End Enum

Public Enum workdays
sunday = 0
monday
tuesday
wednesday
thursday
friday = Days.saturday - 6
invaild = -1
saturday
End Enum

请问这种所谓的枚举究竟有什么用？在一个程序里起到什么作用？我在打friday = Days.saturday - 6 这一行打到Days.这里的时候，跳出了显示有枚举成员的可供选择的滑动条，请问作用就是这个吗？

Answer 1

先举一个例子：
Public Enum TestEnum
OneEnum = 0 '"One"
TwoEnum = 1
'"Two"
ThreeEnum = 2 ' "Three"
End Enum

Sub test(b As TestEnum, a As String)
If b = OneEnum
Then
MsgBox "One" & "," & a
ElseIf b =
TwoEnum Then
MsgBox "Two" & "," & a

ElseIf b = ThreeEnum Then
MsgBox "Three" & "," &
a
End If
End Sub

Sub testRun()
test TwoEnum, "This is a Enum Test"
End Sub

说明如下：
enum语句
定义枚举类型。
语法
[Public | Private] Enum name
membername [=
constantexpression]
membername [= constantexpression]
. . .
End
Enum

Enum 语句包含下面部分：
部分 描述
Public 可选的。表示该 Enum 类型在整个工程中都是可见的。Enum 类型的缺省情况是
Public。
Private 可选的。表示该 Enum 类型只在所声明的模块中是可见的。
name 必需的。该 Enum 类型的名称。name
必须是一个合法的 Visual Basic 标识符，在定义该 Enum 类型的变量或参数时用该名称来指定类型。
membername 必需的。用于指定该
Enum 类型的组成元素名称的合法 Visual Basic 标识符。
constantexpression 可选的。元素的值（为 Long
类型）。可以是别的 Enum 类型。如果没有指定 constantexpression，则所赋给的值或者是 0（如果该元素是第一个
membername），或者比其直接前驱的值大 1。

说明
所谓枚举变量，就是指用 Enum 类型定义的变量。变量和参数都可以定义为 Enum 类型。Enum 类型中的元素被初始化为 Enum
语句中指定的常数值。所赋给的值可以包括正数和负数，且在运行时不能改变。例如：
Enum SecurityLevel

IllegalEntry = -1
SecurityLevel1 = 0

SecurityLevel2 = 1
End Enum
Enum 语句只能在模块级别中出现。定义 Enum
类型后，就可以用它来定义变量，参数或返回该类型的过程。不能用模块名来限定 Enum 类型。
类模块中的
Public Enum 类型并不是该类的成员；只不过它们也被写入到类型库中。在标准模块中定义的 Enum
类型则不写到类型库中。具有相同名字的 Public Enum 类型不能既在标准模块中定义，又在类模块中定义，因为它们共享相同的命名空间。若不同的类型库中有两个
Enum类型的名字相同，但成员不同，则对这种类型的变量的引用，将取决于哪一个类型库具有更高的引用优先级。
不能在 With 块中使用 Enum
类型作为目标。

Answer 2

答对了。。。只是为了方便程序员，写代码的时候可以减少除错概率

Answer 3

嘿嘿，说老实话，从理论角度来说我也不知道这有什么用。
但是我个人的认知是：枚举是将一些相关联的变量集中声明和使用，比如你现在有几个标识变量，添加、删除、修改。那么把他们放到一个枚举里面去，在编写代码的时候，调用起来方便，程序员也可以更轻易的读懂你写的代码的意思。（嘿嘿，纯属路过，答案可能并不是很好。）