vba数组的使用方法

《vba数组的使用方法》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、VBA数组的使用方法　　1、声明数组。　　数组的声明方式和其它的变量是一样的，它可以使用Dim、Static、Private或Public语句来声明。标量变量（非数组）与数组变量的不同在于通常必须指定数组的大小。若数组的大小被指定的话，则它是个固定大小数组。若程序运行时数组的大小可以被改变，则它是个动态数组。　　数组是否从0或1索引是根据OptionBase语句的设置。如果OptionBase没有指定为1，则数组索引从零开始。　　（1）声明固定大小的数组　　下面这行代码声明了一个固定大小的数组，它是个11行乘以11列的In

2、teger数组：　　DimMyArray(10,10)AsInteger　　（2）声明动态数组　　若声明为动态数组，则可以在执行代码时去改变数组大小。可以利用Static、Dim、Private或Public语句来声明数组，并使括号内为为空，如下示例所示。　　DimsngArray()AsSingle　　2、获得数组的最大与最小下标。利用LBound函数与UBound函数函数可以分别来获得数组的最小与最大下标，其语法是：　　LBound(arrayname[,dimension])　　UBound(arrayname[,d

3、imension])　　语法包含下面部分：　　部分描述　　arrayname必需的。数组变量的名称，遵循标准的变量命名约定。　　dimension可选的；Variant(Long)。指定返回哪一维的下界。1表示第一维，2表示第二维，如此类推。如果省略dimension，就认为是1。　　3、ReDim语句。ReDim语句用来定义或重定义原来已经用带空圆括号（没有维数下标）的Private、Public或Dim语句声明过的动态数组的大小，其语法是：　　ReDim[Preserve]varname(subscripts)[Ast

4、ype][,varname(subscripts)[Astype]]...　　ReDim语句的语法包括以下几个部分：　　部分描述　　Preserve可选的。关键字，当改变原有数组最末维的大小时，使用此关键字可以保持数组中原来的数据。　　varname必需的。变量的名称；遵循标准的变量命名约定。　　subscripts必需的。数组变量的维数；最多可以定义60维的多维数组。subscripts参数使用下面的语法：　　[loal（目前尚不支持）、Date、String（对变长的字符串）、String*length（对定长的字符串

5、）、Object、Variant、用户定义类型或对象类型。所声明的每个变量都要有一个单独的Astype子句。对于包含数组的Variant而言，type描述的是该数组的每个元素的类型，不能将此Variant改为其它类型。　　可以使用ReDim语句反复地改变数组的元素以及维数的数目，但是不能在将一个数组定义为某种数据类型之后，再使用ReDim将该数组改为其它数据类型，除非是Variant所包含的数组。如果该数组确实是包含在某个Variant中，且没有使用Preserve关键字，则可以使用Astype子句来改变其元素的类型，但在

6、使用了此关键字的情况下，是不允许改变任何数据类型的。　　如果使用了Preserve关键字，就只能重定义数组最末维的大小，且根本不能改变维数的数目。例如，如果数组就是一维的，则可以重定义该维的大小，因为它是最末维，也是仅有的一维。不过，如果数组是二维或更多维时，则只有改变其最末维才能同时仍保留数组中的内容。——..，。