vb 第五章 数组.pptVIP

引例 一个变量只能存取一个数据，在实际应用中经常要处理同一数据类型的一批数据。 问题：求一个班30位同学的平均成绩并统计高于平均分的人数。 利用所学知识解决该问题方法有二： 解1： 1、通过循环输入30位同学的成绩并累加后，计算其平均分 2、然后又通过循环再次输入30位同学的成绩并与平均分比较统计高于平均分的人数。 缺点：输入两次数据，可能引起前后两次输入的数据不一致。 解2： 1、用30个变量存储同学的成绩 2、逐个变量累加计算平均分 3、最后逐个变量与平均分比较统计高于平均分的人数。 缺点：语句过多，程序较长。 5.1 数组的概念 Dim mark(1 To 100) As Integer 数组声明的一般表达式 Dim 数组名(下标1 [,下标2…]) [ As 类型 ] 下标：表示顺序号，每个数组元素有一个唯一的顺序号。可以是整型的常数或变量、表达式、甚至又是一个数组元素 下标形式：[下界 To] 上界 下标越界 数组元素的使用规则与同类型的简单变量相同 数组类型用Variant时，可包含不同类型的数据 5.2 静态数组 1. 一维数组 Dim 数组名( 下标 ) [ As 类型 ] 例： Dim a (10) As Integer 5.3 动态数组 在声明数组时未给出数组的大小 Dim Larray( ) As Single 在使用动态数组时，用ReDim语句指 出该数组的大小 ReDim 数组名(下标1[,下标2…]) [As 类型] 引例：求一个班全体学生的平均成绩 [注意] 在静态数组声明中的下标只能是常量，在动态数组ReDim语句中的下标可以是常量，也可以是有了确定值的变量 在过程中可多次使用ReDim来改变数组的大小，也可以改变数组的维数 每次使用ReDim语句会使原来数组中的值丢失，在ReDim语句后加Preserve参数可以保留原数组中的数据，但是只能改变最后一维的大小，前面几维大小不能改变 5.4 数组的基本操作 数组的引用 数组元素赋值 数组的输入和输出 For Each … Next 语句 1. 数组的引用 指对数组元素的引用，数组元素的引用形式为： 数组名(下标) 说明： (1) 注意数组定义与数组元素的区别，两者形式相似，但数组的定义出现在Dim语句中，而数组元素一般出现在表达式或赋值语句中。 例如： Dim a(10) ′数组的定义 …… y=a(10) ′数组元素的引用 …… (2) 数组元素也称下标变量。在程序中，凡是简单变量可以出现的地方都可以出现数组元素的引用。 例如： a(8)=a(5)+a(3) (3) 引用数组元素时，数组名、数组的类型和维数必须与 定义数组时保持一致。 例如： Dim b(10) As Integer …… b(3，2)=100 ‘数组元素只能为一维数组元素。 (4) 对二维数组或多维数组，引用时必须给出两个或多个下标。 (5) 引用数组元素时，其下标必须在建立数组时指定的范围， 否则将发生“下标越界”的错误。 例如： Dim b%(10) …… b%(15)=100 ′下标越界，允许使用的下标范围：0～10 (6) 在同一个过程中，数组名不得与简单变量同名。 2. 数组元素赋值 2) 利用Array()函数 Dim a As Variant, b As Variant a = Array(1,2,3,4,5) b = Array(abc, def, 67) For i = 0 To UBound(a) Print a(i); Next i For i = 0 To UBound(b) Print b(i); Next i 3. 数组的输入和输出 （1）一维数组的输入和输出 (2) 二维数组的输入和输出 4. For Each …Next 语句 格式 Option base 1 Dim a(10) As Integer, i%, x For i = 1 To 10 a(i) = Int(100 * Rnd) Next i For Each x In a Print x; ; Next x 5.5 控件数组 相关概念 控件数