第06章数组剖析.doc

第章 数组 .1 数组的概念 数组是一组具有相同名字、不同下标的变量。 说明： （1）数组元素的地位和作用与普通变量相当。 （2）数组中的数据必须是同一个类型。 （3）数组中各元素在内存中占据一片连续的存储单元。（4）数组与循环结合使用，可以很方便地对大批数据进行处理。.2 数组的定义 ReDim定义动态数组模块Public定义 6.2.1 常规数组的定义 格式 Dim 数组名（［第一维下标下界 To ］第一维下标上界］［第维下标下界 To第维下标上界］……） [As 类型] 说明（1）数组名与简单变量相同维数组，维的下标用逗号相隔范围-32768～32767Option Base语句改为1 （5）“类型”用来指定数组元素的数据类型1，多维数组元素个数是各维下标取值个数之积 6.2.2 动态数组的定义 格式 ReDim [Preserve] 数组名（下标）［As 类型］ Preserve，重新定义之后，保留原有元素值 下标的上界和下界可以是常量、变量或表达式 2.定义方法 【方法1】 先用Dim或Public声明一个没有下标的数组用ReDim语句改变数组的大小维数例.2 多次用ReDim语句定义同一个数组Dim S() As String Private Sub Form_Click() ReDim S(4) S(2) = One Print S(2) ReDim S(6 + 1) S(5) = VB Print S(5) ReDim S(2, 3) S(1, 1) = Two Print S(1, 1) End Sub 【方法2】 用ReDim语句直接定义数组改变大小，但不能改变类型维数用ReDim语句直接定义数组Private Sub Form_Click() ReDim var(3) As Integer 直接定义数组 ReDim var(2) 改变数组的大小 ReDim var(2) As Single 错误，不能改变类型 ReDim var(2, 3) 错误，不能改变维数 End Sub 6.3 数组.3.1 数组元素的、输出和复制 1．数组的引用 下标简单变量注意： （1）Dim a(5) As Integer与t = a(5)的区别 （2）引用时，数组名、类型和维数必须与定义数组时一致。（3）引用时，下标值应该在建立数组时所指定的范围内。2．数组元素的Dim a(0 To 5) As Integer a(0) = 1: a(1) = 3: a(2) = 5 a(3) = 7: a(4) = 9: a(5) = 11 【方法2】通过循环语句为多个元素赋值。 例如： Option Base 1 Dim t() As String Private Sub Form_Click() ReDim t(4) For i = 1 To 4 S = InputBox(输入姓名:) t(i) = S Next i End Sub 3．数组元素的输出 例Private Sub Form_Click() Dim t(4, 4) As Integer For i = 1 To 4 For j = 1 To 4 t(i, j) = i + j Print t(i, j); ; Next j Print Next i End Sub 4．数组元素的复制 单个数组元素可以像简单变量一样从一个数组复制到另一个数组。例如： Dim B(5,10),A(8,8),C(10) B(3,4)=A(4,5) C(5)=B(1,2)*A(3,3)+C(2) 6.3.2数组 LBound和UBound函数求数组下标下界上界LBound(ArrayName[,Dimension]) UBound(ArrayName[,Dimension]) 其中，ArrayName数组名，Dimension指定第几维 例如： Dim x(-10 To 100,-5 To 40) LBound (x,1)得x数组第1维的下界值-10 UBound (x,2)x数组第2维的上界值40 例.5 使用LBound和UBound函数。 Private Sub Form_Click() ReDim a(n To m) As Integer Print a数组元素为： For i = LBound(a) To UBound(a) a(i) = i Print a(i); Ne