VBS数组函数学习实例分析

2019-01-15 20:02 来源:易采站长站 作者:王振洲 点击: 评论:

A-A+

原标题:VBS数组函数学习实例分析

Array 函数
返回包含数组的Variant。

Array(arglist)

参数:arglist是赋给包含在Variant中的数组元素的值的列表(用逗号分隔)。如果没有指定此参数,则将会创建零长度的数组。
说明:用于引用数组元素的表示符,由跟随有括号的变量名组成,括号中包含指示所需元素的索引号。

在下面的示例中,第一条语句创建名为 A 的变量。第二条语句将一个数组赋值给变量 A。最后一条语句将包含在第二个数组元素中的值赋值给另一个变量。

arr = array("t1","t2") MsgBox arr(0) MsgBox arr(1)

注意未作为数组声明的变量仍可以包含数组。虽然包含数组的Variant变量与包含Variant元素的数组变量有概念上的不同,但访问数组元素的方法是相同的。

IsArray 函数

返回 Boolean 值指明某变量是否为数组。

IsArray(varname)
参数:varname可以是任意变量。
说明:如果变量是数组,IsArray函数返回True;否则,函数返回False。当变量中包含有数组时,使用IsArray函数很有效。

下面的示例利用IsArray函数验证 MyVariable 是否为一数组:

Dim MyVariable Dim MyArray(3) MyArray(0) = "Sunday" MyArray(1) = "Monday" MyArray(2) = "Tuesday" MyVariable = IsArray(MyArray) ' MyVariable 包含 "True"。

UBound 函数

返回指定数组维数的最大可用下标。

UBound(arrayname[, dimension])
参数:arrayname 必选项。数组变量名,遵循标准变量命名规则。
     Dimension 可选项。指定返回哪一维上界的整数。1 表示第一维,2 表示第二维,以此类推。如果省略dimension参数,则默认值为 1。
说明:UBound函数与LBound函数一起使用,用于确定数组的大小。使用LBound函数可以确定数组某一维的下界。
     所有维的下界均为 0。对于有这样维数的数组,UBound函数返回以下结果:

Dim A(100,3,4) 语句 返回值 UBound(A, 1) 100 UBound(A, 2) 3 UBound(A, 3) 4

LBound 函数

返回指定数组维的最小可用下标。

LBound(arrayname[, dimension])
参数:arrayname 数组变量名,遵循标准变量命名规则。
     Dimension 指明要返回哪一维下界的整数。
     使用 1 表示第一维,2 表示第二维,以此类推。如果省略dimension参数,默认值为 1。
说明:LBound函数与UBound函数共同使用以确定数组的大小。使用UBound函数可以找到数组某一维的上界。任一维的下界都是 0。

arr = array("t1","t2","t3") For i=0 To UBound(arr)-LBound(arr) MsgBox arr(i) Next

Split 函数

返回基于 0 的一维数组,其中包含指定数目的子字符串。

【易采站长站编辑:秋军】