作者：杜勇

描述：声明常量。
一、语法：
[Public|Private]Const　constname[As　type]=expression
Const语句的语法包含下面部分：

部分	描述
public	可选的。该关键字用于在模块级别中声明该常量为全局的（公用的），也就是说在所有模块和窗体中都可以使用的常量。该关键字在窗体中不能使用。
private	可选的。该关键字用于在模块或窗体级声明该常量为局部的，即只能在包含该声明的模块或窗体中使用的常量。不能在过程中使用。
constname	必需的。有效的常量名；遵循标准的变量命名约定。
type	可选的。常量的数据类型；可以是VB变量的各种类型。所声明的每个常量都要使用一个单独的As类型子句。
expression	必需的。文字，其它常量，或由除Is之外的任意的算术操作符和逻辑操作符所构成的任意组合。

二、说明：
　　对于程序中多次出现的数值、文字等最好使用常量，这样在程序运行时不易出错。常量可以使程序更具可读性，以及易于修改。
　　在缺省情况下常量是局部的。在Sub、Function或Property过程中声明的常量都是该过程的局部常量，在类模块声明的常量也是局部的。在标准模块中，可以用Public关键字来声明常量为全局的。
　　可以在一行中声明若干个常量，使用逗号将每个常量赋值分开。用这种方法声明常量时，如果使用了Public或Private关键字，则该关键字对该行中所有常量都有效。

三、应用举例：
　　该示例使用Const语句来声明常量。Public常量在标准模块的通用部分声明，而不是在类模块中声明。Private常量可以在任何模块类型的通用部分声明。
Const Pai = 3.14 '缺省情况下常量是局部的。
Public Const MyStr = "你好" '声明全局常量。
Private Const vbGrayed As Integer = 2 '声明局部的整数常量。
Const MyStr = "你好", Pai As Double = 3.14 '在一行中声明多个常量。