常数 | 金字塔量化

# 什么是常数

常数是具有一定含义的名称，用于代替数字或字符串，其值从不改变。VBScript 定义了许多内部常数,如:颜色常数、字符串常数等。

您可以使用 Const 语句在 VBScript 中创建用户自定义常数。使用 Const 语句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如：

Const MyString = "这是一个字符串。"
Const MyAge = 49

1
2

请注意字符串文字包含在两个引号 (" ") 之间。这是区分字符串型常数和数值型常数的最明显的方法。日期文字和时间文字包含在两个井号 (#) 之间。例如：

Const CutoffDate = #6-1-97#

最好采用一个命名方案以区分常数和变量。这样可以避免在运行脚本时对常数重新赋值。例如，可以使用“vb”或“con”作常数名的前缀，或将常数名的所有字母大写。将常数和变量区分开可以在开发复杂的脚本时避免混乱。

下面这些常数是在 VBScript中内置的, 您在应用之前不必定义它们. 您可在代码中任意处应用它们以表明说明值。

颜色常数列表。

用于比较操作的常数列表。

常数	值	描述
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文本比较。

定义一周中日期以及用于日期和时间操作的常数列表。

用于格式化日期和时间的常数的列表。

常数	值	描述
vbGeneralDate	0	显示日期和/或时间。对于实数，显示日期和时间。如果没有小数部分，仅显示日期。如果没有整数部分，则仅显示时间。由系统设置决定日期和时间的显示。
vbLongDate	1	按计算机中区域设置指定的长日期格式显示日期。
vbShortDate	2	按计算机中区域设置指定的短日期格式显示日期。
vbLongTime	3	按计算机中区域设置指定的长时间格式显示时间。
vbShortTime	4	按计算机中区域设置指定的短时间格式显示时间。

因为此常数在 VBScript中被建立, 您在使用之前不必定义它. 您可在代码中任意处使用它来表示说明值.

常数	值	描述
vbObjectError	-2147221504	自定义错误号应大于该值，例如， Err.Raise Number = vbObjectError + 1000

下列常数与 MsgBox 函数一起使用，标识在消息框中出现的按钮、图标，并指定默认按钮。另外，还可以指定消息框的样式。因为这些常数在VBScript中被建立，您在使用之前不必定义它们。您可在代码中任意处使用它们以表示说明值。

常数	值	描述
vbOKOnly	0	只显示确定按钮。
vbOKCancel	1	显示确定和取消按钮。
vbAbortRetryIgnore	2	显示终止、重试和忽略按钮。
vbYesNoCancel	3	显示是、否和取消按钮。
vbYesNo	4	显示是和否按钮。
vbRetryCancel	5	显示重试和取消按钮。
vbCritical	16	显示临界消息图标。
vbQuestion	32	显示警告询问图标。
vbExclamation	48	显示警告消息图标。
vbInformation	64	显示提示消息图标。
vbDefaultButton1	0	第一个按钮是默认按钮。
vbDefaultButton2	256	第二个按钮是默认按钮。
vbDefaultButton3	512	第三个按钮是默认按钮。
vbDefaultButton4	768	第四个按钮是默认按钮。
vbApplicationModal	0	应用程序模式。用户必须响应消息框，才能继续在当前应用程序中工作。
vbSystemModal	4096	系统模式。在 Win16 系统中，所有应用程序都将中止直到用户响应消息框。在 Win32 系统中，此常数提供一个应用程序模式信息框并总是保留在您可能正在运行的所有其它程序的顶部。

下列常数与 MsgBox 函数一起使用，标识用户选定的按钮。仅当类型库中包含以下常数定义，且在您的工程文件中已经显式引用该类型库后，才允许使用这些常数。对于 VBScript，必须在代码中显式声明这些常数。

常数	值	描述
vbCr	Chr(13)	回车符。
vbCrLf	Chr(13) & Chr(10)	回车符与换行符。
vbFormFeed	Chr(12)	换页符；在 Microsoft Windows 中不适用。
vbLf	Chr(10)	换行符。
vbNewLine	Chr(13) & Chr(10) 或 Chr(10)	平台指定的新行字符；适用于任何平台。
vbNullChar	Chr(0)	值为 0 的字符。
vbNullString	值为 0 的字符串	与零长度字符串 ("") 不同；用于调用外部过程。
vbTab	Chr(9)	水平附签。
vbVerticalTab	Chr(11)	垂直附签；在 Microsoft Windows 中不适用。

仅当类型库包含以下常数定义，且在您的工程文件中已经显式引用该类型库后，才允许使用这些常数。对于 VBScript，必须在代码中显式声明这些常数。