标题：枚举类型
概念
C语言，C#或C++等一些计算机编程语言的一种基本数据类型而不是构造类型，它用于声明一组命名的常数，当一个变量有几种可能的取值时，可以将它定义为枚举类型。 
定义：是指将变量的值一一列出来,变量的值只限于列举出来的值的范围内. 
使用格式：枚举类型放在窗体模块、标准模块或共用模块中的声明部分，通过enum语句来定义。 
.格式：[public|private] enum name 
membername[=constantexpression] 
membername[=constantexpression] 
(maomi)
….. 
End enum
public：表示该枚举类型在整个工程中都是可见的（缺省的） 
private：表示枚举类型只在所声明的模块中是可见的。Name: 枚举类型的名称。必须是一个合法的VB标识符,在定义该枚举类型的变量或参数时用该名称来指定类型. 
Membername:指定该枚举类型的组成元素名称. 
Constantexpression:枚举类型的组成元素的值.如果没有指定具体值,则所有赋的值或者是0或者比其直接前驱的值大1.元素的值也可以是别的enum类型.VB中将枚举中的元素的值按长整数处理.如果将一个浮点数值赋给一个枚举中的元素,VB会将该值取整为最接近的长整数.
枚举成员
枚举变量声明与赋值: 定义枚举类型后,可以声明该枚举类型的变量,然后使用该变量存储枚举元素的数值. 
枚举变量:指用枚举类型定义的变量.变量和参数都可以定义为枚举类型.过程的返回值也可以是枚举类型. 
格式：dim 枚举变量名 as 枚举类型名 
注意:尽管通常只将枚举元素数值赋给枚举类型的变量,但也可以将任何长整数数值赋给该变量.当对与枚举常数不相关的变量赋值时,Vb 不会产生错误. 
枚举语句只能在模块级别中出现,不能用模块名来限定枚举类型. 
(1)枚举的声明:枚举声明用于声明新的枚举类型。 
访问修辞符 enum 枚举名:基础类型 
{
} ;
基础类型必须能够表示该枚举中定义的所有枚举数值。枚举声明可以显式地声明 byte、sbyte、short、ushort、int、uint、long 或 ulong 类型作为对应的基础类型。没有显式地声明基础类型的枚举声明意味着所对应的基础类型是 int。 
(2)枚举成员
枚举成员是该枚举类型的命名常数。任意两个枚举成员不能具有相同的名称。每个枚举成员均具有相关联的常数值。此值的类型就是枚举的基础类型。每个枚举成员的常数值必须在该枚举的基础类型的范围之内。 
示例：public enum TimeofDay:uint 
{ 
Morning=-3, 
Afternoon=-2, 
Evening=-1 
} ;
产生编译时错误，原因是常数值 -1、-2 和 –3 不在基础整型 uint 的范围内。 
(3)枚举成员默认值
在枚举类型中声明的第一个枚举成员它的默值为零。 
以后的枚举成员值是将前一个枚举成员（按照文本顺序）的值加 1 得到的。这样增加后的值必须在该基础类型可表示的值的范围内；否则，会出现编译时错误。 
示例：public enum TimeofDay:uint 
{ 
Morning, 
Afternoon, 
Evening 
} ;
Morning的值为0,Afternoon的值为1,Evening的值为2。 
(4)为枚举成员显示赋值
允许多个枚举成员有相同的值. 
没有显示赋值的枚举成员的值，总是前一个枚举成员的值+1. 
示例 
public enum Number 
{ 
a=1, 
b, 
c=1, 
d 
} ;
b的值为2,d的值为2. 
注意：以上枚举值都不能超过它的基础类型范围。否则会报错. 
(5)枚举类型与基础类型的转换
基础类型不能隐式转换为枚举类型 
枚举类型也不能隐式转换为基础类型 
示例;public enum Number 
{ 
a, 
b, 
c, 
d 
} ;
class Test 
{ 
public static void Main() 
{ 
int i=Number.a;//错误，要强制类型转换(int)Number.a 
Number n; 
n=2 //错误,要强制类型转换(Number)2 
} 
} 
(6)System.Enum类型 
System.Enum 类型是所有枚举类型的抽象基类,并且从 System.Enum 继承的成员在任何枚举类型中都可用。 
System.Enum 本身不是枚举类型。相反，它是一个类类型，所有枚举类型都是从它派生的。 
System.Enum 从类型 System.ValueType派生 
(7)使用枚举类型
using System; 
public enum TimeofDay 
{ 
Morning, 
Afternoon, 
Evening 
} ;
class Test 
{ 
static void WriteGreeting(TimeofDay timeofDay) 
{ 
switch(timeofDay) 
{ 
case TimeofDay.Morning: 
Console.WriteLine("good morning"); 
break; 
case TimeofDay.Afternoon: 
Console.WriteLine("good afternoon"); 
break; 
case TimeofDay.Evening: 
Console.WriteLine("good evening"); 
break; 
} 
} 
static void Main() 
{ 
WriteGreeting(TimeofDay.Morning); 
WriteGreeting(TimeofDay.Evening); 
WriteGreeting(TimeofDay.Afternoon); 
} 
}
操作
①赋值运算 COLOR：=RED ；注意类型一致不能出界；
②关系运算 IF
③输入 枚举变量的值只能用赋值语句获得，不要用READ语句；
④输出 不能直接用WRITE语句直接输出枚举元素，系统会认为它是一个
未定义的变量名；必须赋给一个枚举变量，然后输出给变量的值；
如果想要用READ和WRITE语句，怎么办？
VAR I：INTEGER；
COLOR：（RED，YELLOW，BLUE）；
BEGIN
WRITELN（‘0—RED ，1—YELLOW ，2—BLUE ’）；
READLN（I）；
CASE I OF 
：COLOR：=RED；：COLOR：=YELLOW；：COLOR：=BLUE END；
{ 数据处理 }
CASE COLOR OF 
RED ：WRITELN（‘RED’）；
YELLOW：WRITELN（‘YELLOW’）；
BLUE：WRITELN（‘BLUE’）
END；
END.
应用举例
例二：一家水果店出售4种水果，每千克价格分别是：苹果1.15元，桔子1.20元，香蕉0.95元，菠萝0.85元。编一程序使售货员主要从键盘上打入货品的代码及重量，计算机将显示货品名、单价、重量及总价。货品代码为苹果1，桔子2，香蕉3，菠萝4。
CONST PA=1.15；PO=1.20；PB=0.95；PP=0.85；
TYPE FRUITTYPE =（APPLE，ORANGE，BANANA，PINEAPPLE）；
VAR TOTAL，WEIGHT，P：REAL； { 重量和价格 }
CODE：INTEGER； { 代码 }
FRUIT：FRUITTYPE；
BEGIN
READLN（CODE，WEIGHT）；
WHILE （CODE>=1）AND （CODE<=4）DO
BEGIN 
CASE CODE OF 
1 : FRUIT:=APPLE;
2 : FRUIT:=ORANGE;
3 : FRUIT:=BANANA;
4 : FRUIT:=PINEAPPLE;
END;
CASE FRUIT OF 
APPLE : BEGIN WRITE(‘APPLE’); P:=PA END;
ORANGE: BEGIN WRITE(‘ORANGE’); P:=PO END;
BANANA : BEGIN WRITE(‘BANANA’); P:=PB END;
PINEAPPLE : BEGIN WRITE(‘PINEAPPLE’); P:=PP END;
END;
WRITE(P:6:2, ‘ * ’, WEIGHT:6:2 , ‘ = ’);
WRITELN(p*WEIGHT:8:2);
READLN(CODE,WEIGHT);
END;
END.
C中示例：
typedef enum {
DEMO_LABEL_A = 0,
DEMO_LABEL_B,
DEMO_LABEL_C 
DEMO_LABEL_D
} demo_label_t;
demo_label_t demo_label;
/* 对demo 的赋值操作 */
if (demo_label == DEMO_LABEL_C)
printf ("the label is C");