二、常量

在用户程序中经常会发现代码中一些数值从不改变，并且一次又一次地反复出现，在这种情况下，可用常量来表示这些数值。例如，将圆周率定义为常量Pi，在程序中就可以使用Pi代替这个常数。另外，常量的处理比变量快。程序运行时，常量值不需要查找，编译器只要把常量名换成常数即可，这样保证了程序执行更快。

VB常量分两类：系统内部常量和符号常量（自定义常量）。

1、系统内部常量

系统内部常量是应用程序和控件提供的，常量可与应用程序的对象、方法和属性一起使用。可以在帮助文件中查找相应的常量。系统内部的常量名采用大小写混合的格式，其前缀表示定义常量的对象库名。来自Visual Basic和Visual Basic forapplications对象库的常数以“Visual Basic（Vb）”开头，例如VbBlack表示黑色。来自访问对象库的常数以“db”开头，例如dbRelationUnique。

2、符号常量（自定义常量）

自定义常量顾名思义是用户自己定义的常量。使用自定义的关键字是：Const

常量的语法定义格式：

        [Public|Private] Const  变量名 [As 数据类型]=表达式

其中：

（1）Public——公共声明，使用它声明的常量可在整个应用程序中使用，它必须在标准模块的声明区中使用。在窗体模块或类模块中不能声明该常量。

（2）Private——私有声明，它可以用在模块级声明常量。模块级声明是指放在窗体、类或标准模块内的声明。其关键字不能在过程声明变量时使用。

Public和Private表示定义常量的使用范围，在缺省情况下常数是私有的。

（3）常量名的命名规则与标准变量的命名一样

（4）数据类型可以为：

Byte,Boolean,Integer,long,Currency,Single,Double,Date,String或Variant。

（5）表达式是数值、字符串与运算符的组合

等号(=)右边的表达式往往是数字或文字串，但也可以是其结果为数或字符串的表达式(但在表达式中不能包含函数)。甚至可用先前定义过的常数定义新常数。

例：

    Const Pi＝3．14159265358979
    Public Const MaxPlanect AS Integer=9
    Const ReleaseDate＝#1/1/95#
    Public Const Version="07.10.A"
    Const CodeName="Enigma"

说明：

如果程序中有特别频繁使用的值，且这个值从不变化，并在整个模块和窗体中使用，可以用：Public const 语句来声明一个全局常量。

用Const声明的常量在程序运行的过程中，不能被重新赋值；

在常量声明的同时要对常量赋值；

可以为声明的常量指定类型，如：Const conVal As Currency=3.37，缺省时为所赋的类型；

在使用一常量为另一常量初始化时，注意循环引用时会出错。

注意：定义常量时，可以指定常量的类型，也可以不指定。如果不指定常量的类型，则系统会根据表达式的数值指定该常量的类型。如果用逗号进行分隔，则在一行中可放置多个常量声明。