2016数据库Access应用(主编范萍-中央广播电视大学出版社) 常量.docVIP

2．常量 ? 定义常量来代替那些固定不变量的数字或字符串，可以提高代码的可读性和可维护性。VBA中有一部分常量是系统预先定义的，可以直接使用。用户也可以使用自己定义的常量，但在使用之前必须声明，以便分配内存空间。语法如下： [Public/Private] Const 常量名 [As 数据类型] = 表达式 例如： Const Pi=3.14159265358979323 Public Const A1 As Integer=6 Const BornDay=#03/23/80# Private Const A2=”Abcdef258” ? 常量有3个范围级别：过程级别（在过程中声明的）、私有模块级别（Private）、公共模块级别（Public）。 Access支持3种类型的常量： ? ◆ 符号常量：需要声明的常数都是符号常量。 ◆ 固有常量：是Access或引用对象库的一部分。 ◆ 系统定义常量：True、False、Null。 ? 其中，符号常量可以按上述方法声明；系统定义常量只有上述三个。而固有常量则比较复杂一些，它是系统自动定义的，它由应用程序列与控件提供。它采用两种方法来限定常数：通过前缀（如VBA对象库的常数都以Vb开头，如Vb Tile Horizontal）或通过库应用（[Libyan]|[mdul name] Constant）。 用户可以使用对象浏览器来查看所有对象库中的固有常量列表。具体操作如下： ◆ 单击数据库窗口【对象】栏下的【模块】按钮，再单击工具栏中的【代码】按钮，进入模块代码窗口。 ◆ 单击代码窗口工具栏中的【对象浏览器】窗口。 ◆ 要查看可以使用的常量，在【对象浏览器】窗口中的【工程/库】下拉列表框中选择【所有库】选项。此时，在窗口的【类】列表框中将显示所有引用对象库中的类。 ◆ 在【有哪些信誉好的足球投注网站文字】下拉列表框中输入“Constant”，然后单击【对象浏览器】工具栏上的【有哪些信誉好的足球投注网站】按钮，则会在【有哪些信誉好的足球投注网站结果】列表框中显示所有固有常量类型。所有的这些固有常量都可以在宏或VBA中使用，用户可以在任何时候，在任何允许使用符号常量或用户自定义常量的地方使用固有常量。 ? Access中主要有以下几种类型的固有常量：操作常量、DAO常量、事件过程常量、关键字常量、Run Command 方法常量、安全常量、VBA常量和Var Type函数常量。 ? 下面是VBA定义的一些常数，使程序设计变得更为简单。下列常数可在程序代码中的任何地方代替实际值： ◆ Calendar 常数 常数??? 值? 描述 vbCalGreg?? 0?? 指出使用的是阳历。 vbCalHijri? 1?? 指出使用的是伊斯兰历法。 ? ◆ CallType 常数 常数? 值? 描述? vbMethod 1 指出已经调用了一个方法。? vbGet 2 指出一个Property Get 过程。 vbLet 4 指出一个 Property Let 过程。? vbSet 8 指出一个 Property Set 过程。 ? ◆ Color 常数 常数 值描述 vbBlack 0x0 黑色 vbRed 0xFF 红色 vbGreen 0xFF00 绿色 vbYellow 0xFFFF 黄色 vbBlue 0xFF0000 蓝色 vbMagenta 0xFF00FF 紫红色 vbCyan 0xFFFF00 青色 vbWhite 0xFFFFFF 白色 ? ◆ Compiler 常数 Visual Basic for Applications 定义了一些不能与 #If...Then...#Else 指令一起使用的常数。这些常数除了其范围是全局的；也就是说，除了可在工程中到处应用，在功能上与 #If...Then...#Else 指令定义的常数相同。 在 16 位开发平台上，编译常数定义如下： ? 常数 值描述 Win16 True 指出开发环境是 16 位。 Win32 False 指出开发环境不是 32 位。 ? 在 32 位开发平台上，编译常数定义如下： ? 常数 值描述 Vba6? True? 指出开发环境是 Visual Basic for Applications, version 6.0。 Vba6? False? 指出开发环境不是Visual Basic for Applications, version 6.0。 Win16 False 指出开发环境不是 16 位。 Win32 True 指出开发环境是 32 位。 Mac False 指出开发环境不是 Macintosh。 Win16 False 指出开发环境不是 16位的。 Win32 False 指出开发环境不是 32位的。 Mac Tr