第五章 数组 第1 页 共 2 4 页 Visual Basic 6.0 第 1 页 共2 4 页 1 第五章 数组 主要内容 数组的概念 静态数组及声明 动态数组及声明 数组的基本操作 控件数组 自定义数据类型 常用算法（二） 常见错误 5.1 数组的概念 1．引例 若我们要求一个班100个学生的平均成绩，然后统计高于平均分的人数。按以前简单变量的使用和循环结构相结合，求平均成绩程序段如下： aver = 0 For i = 1 To 100 mark = Val(InputBox("输入第 " & i & " 位学生的成绩")) aver = aver + mark Next i aver = aver / 100 但若要统计高于平均分的人数，则无法实现。mark是一个简单变量，存放的是最后一个学生的成绩。 从已有知识解决方法：再重复输入成绩，逐一与平均分比较。这样带来两个问题： （1）输入数据的工作量成倍增加； （2）若本次输入的成绩与上次不同，则统计的结果不正确。 解决此问题的根本方法是：始终保持输入的数据，一次输入，多次使用，为此必须引入有关数组的内容。 2．数组的概念 数组并不是一种新的数据类型，而是一组相同类型的变量的集合。数组必须先声明后使用。 在 VB中有两类数组，一类是静态(定长)数组另一类称为动态(可变长)数组。 5.2 静态数组及声明 在声明数组时就确定了数组元素的个数的数组称为静态数组。 定义格式: Dim 数组名(下标 1[,下标 2„]) [As 类型] 数组维数：定义数组是用几个下标就表示数组是几维数组，最多 60维。 定义数组是下标的形式为 [下界 To ] 上界 省略下界则系统默认下界为0，下界上界的值必须为数值常数或常数表达式（也可含逻辑常数或数值字符串）。第五章 数组 第2 页 共 2 4 页 Visual Basic 6.0 第 2 页 共2 4 页 2 数组每一维大小： 上界－下界+1。数组元素的个数（或称大小）： 每一维大小的乘积 [例] Dim mark(1 to 100) As Integer 定义数组mark为一维整型数组，其下界为1，上界为100，大小为100（即mark有100个元素）。 Dim lArray( 0 To 3， 0 To 4) As Long 它等价于： Dim lArray(3， 4) As Long 类型为长整型，二维数组，行下界为0 ，行上界为3 ，列下界为0 ，，列上界为4 ，共有 4×5 个元素。 又如定义， Dim a(-3.5 To 9, 7) 定义了数组a为两维变体数组（这样数组内的元素的值类型可以不同，如 a(-1,...
