Excel VBA编程定义多维数组.docx

Excel VBA编程 定义多维数组Excel VBA编程 定义多维数组 前面介绍的数组主要是一维数组，这种数组适用于存放一系列没有关系的一维数据，如姓名、单据等数据。但如果数据中有层次关系，如要记录一个学校所有班级的学生信息，当然也可以用一维数组来实现。但是如果两个班级中有重名的学生，就无法加以区分。这时，利用多维数组就可以很方便地解决这问题，可以将这样的数据存储在一个二维数组中，二维数组有两个下标，第一个表示行(数组中的班级)，第二个表示列即班级中的学生)，如图5-3所示，显示了用二维数组存储班级学生的方法。 班级1郑晓明吴兆玉孙明孙晓红0班级2周晓彬何利史观田高升鹏1班级3虫虫史艳娇贾庆华王洪2班级0123图5-3 班级信息 声明多维数组的方法与声明维数组方法类似，只需要在第一维数组边界后面加上第二维数组边界即可，边界之间用逗号隔开。 格式：Dim 数组名(下界1 TO上界1，下界2 TO上界2) As 数据类型 其中，在定义二维数组的过程中，包含了以下两个参数： l l 下标个数：决定了数组的维数。 每一维的大小为：上界-下界+1。数组中元素的总数为每一维大小的乘积。 例如：定义二维整型数组s。 Dim s(4,9) As Integer 上面的代码定义了一个二维数组。在该数组中其数组元素按照图5-4所示，进行排列。 s(0,0)s(1,0)s(2,0)s(3,0)s(4,0)s(0,1)s(1,1)s(2,1)s(3,1)s(4,1)s(0,2)s(1,2)s(2,2)s(3,2)s(4,2)s(0,3)s(1,3)s(2,3)s(3,3)s(4,3)s(0,4)s(1,4)s(2,4)s(3,4)s(4,4)s(0,5)s(1,5)s(2,5)s(3,5)s(4,5)s(0,6)s(1,6)s(2,6)s(3,6)s(4,6)s(0,7)s(1,7)s(2,7)s(3,7)s(4,7)s(0,8)s(1,8)s(2,8)s(3,8)s(4,8)s(0,9)s(1,9)s(2,9)s(3,9)s(4,9)图5-4 二维数组 从图中可以看出，该数组中有50个元素组成，且每个元素的数据类型都是整型。 随着数组的维数的增加，数组所占的存储空间会大幅度增加，所以要慎用多维数 组。使用Variant数组时要更加小心，因为它需要更大的存储空间。 提 示