赵工的个人空间

VBScript的变量与常数

一、VBScript的变量：

变量，可以引用计算机的内存地址，只要通过变量名就可以查看或者更改变量的值。

1. 变量的类型：

VBScript只有一种Variant数据类型，包含13种子类型，如数字、字符串等等。可以使用VarType函数返回数据的子类型，也可以用转换函数来转换数据的子类型。所有变量的数据类型都是Variant。

2. 变量的声明：

变量可以显式声明，也可以隐式声明（即不声明而直接使用）。隐式声明，比较方便，但拼写错误就容易导致出现意外结果，因此可以使用Option Explicit语句强制显式声明所有变量，一般将其作为脚本的第一条语句。

声明变量使用Dim、Public和Private语句，多个变量用逗号分开，例如：

  Dim Top, Bottom, Left, Right

3. 变量命名规则：

变量名必须遵循VBScript的命名规则：

·第一个字符必须是字母；

·不能包含嵌入的句点；

·长度不能超过255个字符；

·在被声明的作用域必须唯一；

·变量具有作用域与存活期。

4. 变量的作用域与存活期：

变量的作用域由声明它的位置决定。如果在过程中声明变量，则只有该过程的代码可以访问及更改变量值，此时变量具有局部作用域并称为过程级变量。

如果在过程外声明变量，该变量可以被脚本中的所有过程所识别，称为Script级变量，具有脚本级作用域。

变量的存在时间称为存活期。Script变量的存活期从被声明开始，直到脚本运行结束为止。对于过程级变量。其存活期只是过程运行时间，过程结束后变量就消失。

在执行过程中，局部变量是理想的临时存储空间，可以在不同的过程中使用同名的局部变量，因为每个局部变量只会被声明它的过程识别。

5. 变量的赋值：

用表达式为变量赋值，变量在左边，要赋的值在右边。例如：

  B=200

6. 数组变量：

数组变量的声明：

  Dim A(10)

由于VBScript中所有数组是基于0的，所以这个数组包含了11个元素。

可以在数组中使用索引为每个元素赋值，例如：

  A(0)=256

  A(1)=324

  ......

与此类似，使用索引可以检索到所需的数组元素的数据，例如：

  SomeVar=A(8)

数组并不限于一维，，最大可以为60（尽管多少人不能理解超过3或4的维数）。声明多维数组时需要用逗号分隔括号中每个表示数组大小的数字。示例，有6行11列的二维数组：

  Dim MyTable(5,10)

页可以声明动态数组，即在运行脚本时大小发生变化的数组。对动态数组初次声明的括号中不包含任何数字，例如：

  Dim MyArray()

必须随后使用ReDim确定维数和每一维的大小（ReDim也可对动态数组初次声明），例如：

  ReDim MyArray(25)

使用Preserve关键字在重新调整大小时保留数组的内容：

  ReDim Preserve MyArray(30)

重新调整动态数组大小的次数是没有限制的，但将数组调小时会丢失被删除元素的数据。

使用Erase语句可以重新初始化静态数组的元素或释放动态数组的存储空间，然后还要使用ReDim重新定义动态数组的维数。

  Erase MyArray

对静态数值数组，Erase将每个元素置为0；对静态字符串数组，Erase将每个元素置为0长度字符串；对静态对象数组，Erase将每个元素置为特殊值Nothing。

7. 标量变量：

只包含一个值的变量被称为标量变量，与数组变量相对。

二、VBScript的常数：

常数是具有一定含义的名称，用于代替数字或字符串，其值从不改变。

1. 创建常数：

可以使用Const语句创建用户自定义常数，例如：

  Const MyString=”string”

  Const MyAge=49

字符串文字包含在两个引号之间，日期和时间文字包含在两个#号之间。最好采用一个命名方案以区分常数和变量，以避免运行脚本时对常数重新赋值。

2. VBScript固有常数：

VBScript 中设置了一些可以在程序代码中使用的有用常数，方便直接使用特定的数值但不需要记住具体的值。由于这些常数已经在 VBScript 中得到定义，在程序代码中不需要显式地声明它们，在需要的地方直接使用它们就可以了。常数分为几类。

1）颜色常数：定义了脚本中可以使用的 8 种基本颜色。

常数	值	描述
vbBlack	&h00	黑色
vbRed	&hFF	红色
vbGreen	&hFF00	绿色
vbYellow	&hFFFF	黄色
vbBlue	&hFF0000	蓝色
vbMagenta	&hFF00FF	紫色
vbCyan	&hFFFF00	青色
vbWhite	&hFFFFFF	白色

2）日期及时间常数：定义了被各种日期与时间函数使用的日期与时间常数。

常数	值	描述
vbSunday	1	星期日
vbMonday	2	星期一
vbTuesday	3	星期二
vbWednesday	4	星期三
vbThursday	5	星期四
vbFriday	6	星期五
vbSaturday	7	星期六

3）日期格式常数：定义了用于规定日期和时间格式的常数。

常数	值	描述
vbUseSystem	0	使用计算机区域设置中的日期格式。
vbUseSystemDayOfWeek	0	由系统设置定义每周的第一天是星期几。
vbFirstJan1	1	使用包含 1 月 1 日的星期（默认）。
vbFirstFourDays	2	使用第一个至少包含新的年中四天的星期。
vbFirstFullWeek	3	使用某年的第一个整周

4）区域设置 ID (LCID) 表：区域 ID 及其相关值的列表。

区域设置描述	简写	16进制值	10进制值
中文 - 中华人民共和国	zh-cn	0x0804	2052
中文 - 香港特别行政区	zh-hk	0x0C04	3076
中文 - 新加坡	zh-sg	0x1004	4100
中文 - 台湾地区	zh-tw	0x0404	1028
英语 - 英国	en-gb	0x0809	2057
英语 - 美国	en-us	0x0409	1033
俄语	ru	0x0419	1049
日语	ja	0x0411	1041
朝鲜语	ko	0x0412	1042
越南语	vi	0x042A	1066

其他略去。

5）MsgBox 常数：定义了在 MsgBox 函数中使用的常数，

下列常数与 MsgBox 函数一起使用，标识在消息框中出现的按钮、图标，并指定默认按钮。另外，还可以指定消息框的样式。

常数	值	描述
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，必须在代码中显式声明这些常数。

常数	值	描述
vbOK	1	确定按钮被单击
vbCancel	2	取消按钮被单击
vbAbort	3	终止按钮被单击
vbRetry	4	重试按钮被单击
vbIgnore	5	忽略按钮被单击
vbYes	6	是按钮被单击
vbNo	7	否按钮被单击

6）字符串常数：定义在字符串操作中可以使用的各种不可打印字符。

常数	值	描述
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 中不适用

7）三态常数：定义了被规定数字格式的函数使用的常数。

常数	值	描述
vbUseDefault	-2	使用来自计算机最初设置中的默认值
vbTrue	-1	True
vbFalse	0	False

8）变量子类常数：定义了各种 Variant 子类型。

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

常数	值	描述
vbEmpty	0	未初始化（默认）
vbNull	1	不包含任何有效数据
vbInteger	2	整型子类型
vbLong	3	长整型子类型
vbSingle	4	单精度子类型
vbDouble	5	双精度子类型
vbCurrency	6	货币子类型
vbDate	7	日期子类型
vbString	8	字符串子类型
vbObject	9	对象
vbError	10	错误子类型
vbBoolean	11	Boolean 子类型
vbVariant	12	Variant （仅用于变量数组）
vbDataObject	13	数据访问对象
vbDecimal	14	十进制子类型
vbByte	17	字节子类型
vbArray	8192	数组

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

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

10）杂类常数：杂类常数定义了比较难以归类的常数。

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