Visual Basic程序设计实用教程 教学课件 作者 于秀敏 第5章 数组.pptVIP

第5章 数组 5.1 数组概述 5.2 静态数组 5.3 动态数组 5.4 数组的基本操作 5.5 数组的应用举例 5.6 用户自定义数据类型 5.1 数组概述 1．引例 例5.1 统计某班30名同学计算机课程的平均成绩及高于平均分的人数。 计算平均成绩可以通过使用简单变量和循环结构来完成，程序代码如下： Dim aver As Single Dim mark As Integer, i As Integer, sum As Integer sum = 0 For i = 1 To 30 mark = Val(InputBox(输入 i 位学生的成绩)) sum = sum + mark Next i aver = sum / 30 思考：如何统计高出平均成绩的人数？ 用数组解决求30人的平均分和高于平均分的人数，程序代码如下： Private Sub Form_Click() Dim mark(1 To 30) As Integer 数组声明，mark数组有30个元素 Dim aver As Single, i As Integer, sum As Integer sum = 0 For i = 1 To 30 本循环结构输入成绩，求分数和 mark(i) = Val(InputBox(输入 i 位学生的成绩)) sum = sum + mark(i) Next i aver = sum / 30 求30个学生的平均分 n = 0 For i = 1 To 30 本循环结构统计高于平均分的人数 If mark(i) aver Then n = n + 1 Next i Print 平均分：, aver, 高于平均分的人数:, n End Sub 2．数组的概念 数组：是一组相同类型变量的集合。 数组名：作为同一数组中的数，它们使用一个统一的名称（即数组名）来表示。 数组元素：数组中的每一个变量。 下标：为了区分数组中的每一个元素，需要用一个索引号来区别，该索引号称为下标。 使用数组时，先声明后使用。 “声明”，就是对数组名、数组元素的数据类型、数组元素的个数进行定义。 使用数组时需要注意： （1）整个数组中的下标有上界和下界，数组的元素在上下界内是连续的，下标的上下界决定了该数组中所包含的元素个数（数组的大小）。 （2）一个数组中的所有元素具有相同的数据类型。 （3）根据数组中下标的个数将数组分为一维数组和多维数组。 （4）根据数组中元素个数是否可以改变将数组分为静态数组和动态数组。 5.2 静态数组 在声明时确定了数组元素个数的数组，称为静态数组。 根据数组的维数（即下标的个数）不同，可以将它们分为一维数组和多维数组。 5.2.1 一维数组 只有一个下标变量的数组，称为一维数组。 1．一维数组的声明 声明形式如下： Dim 数组名(下标) [As 类型] 其中： （1）数组名：命名要符合变量名命名规则。 （2）下标： 必须为常数，不可以为变量或表达式。 下标的形式：[下界 To ] 上界 （3）数组元素的个数：上界－下界+1。 （4）[As 类型]：用来声明数组元素的数据类型。如果缺省，则与变量的声明一样，默认为是变体型数组。 2．一维数组元素的引用 数组元素的引用形式： 数组名（下标） 其中： 下标是整型的常量、变量或表达式。 5.2.2 多维数组 由两个以上下标的数组元素所组成的数组，称为多维数组。 1．多维数组的声明 声明形式如下： Dim 数组名(下标1[,下标2…]) [As 类型] 其中： （1）下标个数：几个下标为几维数组，最多60维。 （2）数组元素的个数：数组每一维的元素个数，也就是数组每一维的大小是（上界－下界+1），而整个数组的元素个数，是每一维元素个数的乘积。 2．多维数组元素的引用 与一维数组一样，多维数组也要先声明，才能使用。 数组元素的引用形式： 数组名 (下标1[,下标2…]) 5.2.3 LBound函数 和UBound函数 UBound()函数和LBound()函数分别用来返回数组指定维的上界和下界值。 函数格式如下： UBound(数组名[, N]) 功能：返回数组指定维的下标上界。 LBound(数组名 [, N]) 功能：返回数组指定维的下标下界。 其中： 数组名：是必须的。数组变量的名称。 N：是可选的项，一般是整型常量或变量。指定返回哪一维的下标上界（下界）。如果省略N，则返回的是第一维的上界（下界）。 5.3 动态数组 建立动态数组分为两个步骤： （1）用Dim声明一个括号内为空的数组（括号不能省略）。 格式如下： Dim? 数组名() [As?类型] （