VB第四章数组.ppt

第4章 数组 数组的引入 定长数组 变长数组 数组的基本操作 控件数组 自定义数据类型数组的应用 数组的引入 题目:求10名学生的平均成绩以及最高成绩。 程序1： Private Sub Command1_Click() Dim aver As Integer, mark As Integer, maxmark As Integer mark = InputBox(输入第1位学生的成绩, 数据输入) aver = mark maxmark = mark For i = 2 To 10 mark = InputBox(输入第 i 位学生的成绩, 数据输入) If mark maxmark Then maxmark = mark aver = aver + mark Next i Print aver = ; aver / 10; maxmark End Sub 程序2： Private Sub Command1_Click() Dim aver As Integer, mark(1 To 10) As Integer, maxmark As Integer mark(1) = InputBox(输入第1位学生的成绩, 数据输入) aver = mark(1) maxmark = mark(1) For i = 2 To 10 mark(i) = InputBox(输入第 i 位学生的成绩, 数据输入) If mark(i) maxmark Then maxmark = mark(i) aver = aver + mark(i) Next Print aver =; aver / 10; maxmark End Sub 从表面上看，两端程序差别不大，但是后者引入了数组mark(1 to 10)，这样，每一个学生的成绩都保留在数组中，可以随时加以调用。 数组：是具有相同数据类型的元素所成的有序集合，每个数组是用一个统一的名称表示数组元素的集合，数组中的每一元素具有唯一索引号（即下标），可以用数组名及下标唯一地识别一个数组的元素。 数组必须遵循先声明后使用的原则，声明一个数组就是声明其数组名、类型、维数和数组的大小。下标的个数决定数组的维数，各维下标之间用逗号分开。在VB中有一维数组、二维数组等，最多可以达到60维。按声明时是否可以确定数组的大小将数组分为静态数组和动态数组，前者大小固定，后者大小不确定，以后在使用前需要重定义。 在声明数组时，给定了数组元素个数的数组称为静态数组。 数组声明的形式为： Public| Private| Dim 数组名（维数定义）[As类型] 静态数组分一维数组、二维数组及多维数组，VB中最多可达60维。在声明时，数组只有一个下标，则该数组即为一维数组。 静态数组 声明一维数组形式如下： Dim 数组名（下标）[as 类型] 注意： ① 数组名的命名与简单变量相同，可以是任意合法的标识符。 ② 所谓下界和上界，就是数组下标的最小值和最大值，默认下界为0； ③ 如果定义数组时不指定其类型，默认是变体型的。 ④ 下标个数决定数组的维数，最多60维。每一维的大小=上界-下界+1； ⑤ 在定义定长数组时，其上界和下界必须是常数或常量表达式，下标下界最小为-32768，上界最大为32767。 一维数组的声名 一维数组的声名例题 ① Dim Y(100) As Integer 声明了Y是数组名、整型 、一维数组、有101个元素；下标的范围0~100。若在程序中使用a(101)，则系统会显示“下标越界”。 ② Dim a(1 to 10) As Integer ③ Dim b(5 to 9) As String ④ Dim c(9) As Integer ⑤ Dim d(6) 错误的声名 n=InputBox(输入数组的上界) Dim a(1 To n)As Integer 编写程序时，一维数组通常与For循环结合使用，For语句中的循环变量作为数组元素的下标，通过循环变量的不断改变，达到对每个数组元素依次进行处理的目的。 ①随机产生20个两位数的随机整数，赋给A数组，然后求各元素之和、平均值，将比平均值大的各元素的值打印出来，最后找出数组中的最大值及其元素下标并打印。 ②数组中的数据（可以随机产生）倒序存放 ③数组中的数据（可以随机产生）排序 一维数组课堂练习  在声明时，数组有两个下标，则该数组即为二维数组。 二维数组的声