数组及其应用.ppt

4.3.5多维数组的声明和引用定义多维数组的格式如下：Dim数组名([下界]to上界，[下界to]上界，……)[As数据类型]例如：Dima(5,5,5)AsInteger声明a是三维数组Dimb(2,6,10,5)AsInteger声明b是四维数组4.3二维数组及多维数组第31页,共47页，星期六，2024年，5月动态数组：在声明时未给出数组的大小。在程序执行时分配存储空间。4.4.1动态数组的建立及使用建立动态数组包括声明和大小说明两步：1．在使用Dim、Private或Public语句声明括号内为空的数组。格式：Dim|Private|Public数组名（）As数据类型例：Dima()AsInteger2．在过程中用ReDim语句指明该数组的大小。格式：ReDim[Preserve]数组名（下标1[，下标2…]）Preserve参数：保留数组中原来的数据例：RedimA(10)RedimPreserveA(20)4.4动态数组第32页,共47页，星期六，2024年，5月说明：（1）ReDim语句是一个可执行语句，只能出现在过程中，并且可以多次使用，改变数组的维数和大小。（2）定长数组声时中的下标只能是常量，而动态数组ReDim语句中的下标是常量，也可以是有了确定值的变量。例：PrivateSubForm_Click()DimNAsIntegerN=Val(InputBox(“输入N=？”))Dima(N)AsInteger…….Endsub×4.4动态数组第33页,共47页，星期六，2024年，5月（3）在过程中可以多次使用ReDim来改变数组的大小，也可改变数组的维数。例：ReDimx(10)ReDimx(20)x(20)=30Printx(20)ReDimx(20,5)x(20,5)=10Printx(20,5)（4）每次使用ReDim语句都会使原来数组中值丢失，可以在ReDim后加Preserve参数来保留数组中的数据。但此时只能改变最后一维的大小。4.4动态数组第34页,共47页，星期六，2024年，5月例4.5通过输入对话框输入一批正整数，将其中的偶数和奇数分别存入数组a和数组b中，然后分别以每行10个输出数组a和b。4.4动态数组第35页,共47页，星期六，2024年，5月4.4.2与数组操作有关的几个函数Array函数Array函数可方便地对数组整体赋值，但它只能给声明Variant的变量或仅由括号括起的动态数组赋值。赋值后的数组大小由赋值的个数决定。例如，要将1,2,3,4,5,6,7这些值赋值给数组a，可使用下面的方法赋值。Dima()A=array(1,2,3,4,5,6,7)DimaA=array(1,2,3,4,5,6,7)4.4动态数组第36页,共47页，星期六，2024年，5月2求数组的上界Ubound()函数、下界Lbound()函数Ubound()函数和Lbound()函数分别用来确定数组某一维的上界和下界值。使用形式如下：UBound(数组名[,N])LBound(数组名[,N])其中：数组名：数组变量的名称，遵循标准变量命名约定。N ：可选的；一般是整型常量或变量。指定返回哪一维的上界。1表示第一维，2表示第二维，如此等等。如果省略默认是1。4.4动态数组第37页,共47页，星期六，2024年，5月3．Split函数使用格式：Split(字符串表达式[