VB6程序设计5.4章节幻灯片.pptVIP

* * * * * * * 5.4 数 组 本章目录 5.4.1 数组的概念 1. 问题的提出 例5.4.1 ①求100个学生的平均成绩,程序如下： 本章目录 XX mark aver = 0 For i = 1 To 100 mark = InputBox(输入学生成绩) aver = aver + mark Next i aver = aver / 100 上述代码带来问题 （1）mark只能放一个学生的成绩，要实现统计高于平均分的人数。重复输入每人的成绩和不保证输入的一致性。 （2）若用简单变量保存100个学生的成绩，则需定义100个变量和使用100句输入语句。由此引入了数组。 ②统计高于平均分的人数,如何实现？ 数组存放100人成绩： 本章目录 xx xx … xx xx xx mark(99) mark(98) … mark(2) mark(1) mark(0) Dim mark%(99)，aver!, overn%, i% ‘声明数组 aver=0 : overn = 0 For i = 0 To 99 统计高于平均分的人数 If mark(i) aver Then overn = overn + 1 Next i For i = 0 To 99 输入成绩，求分数和 mark(i) = InputBox(输入学生的成绩) aver = aver + mark(i) Next i aver = aver / 100 求100人的平均分 数组: 一般由相同类型的变量的集合， 系统为其分配了连续的存储区域。 概念：数组名代表逻辑上相关的一批数据； 下标表示该数组中各个元素顺序号； 下标变量表示数组中各个元素 和循环语句结合使用，程序书写精炼。 本章目录 2. 数组的概念 例 Dim mark(99) As Integer 声明: 一维整型数组mark ，共有100个元素； 下标: 范围为0 To 99； 各元素: mark(0)，mark(1)，…，mark(99)； mark(i)表示由下标i的值决定是哪一个元素。 注意： 1.每个数组元素有一个唯一的顺序号即下标，下标不能 超出数组声明时的上、下界范围，否则会产生: “索引超出了数组界限”。 2.数组元素的使用规则与同类型的简单变量相同。 本章目录 5.4.2 数组声明 1.一维数组声明形式： Dim 数组名(下标上界) [As 类型] 下标上界为：常数 下标下界为：0 一维数组的大小为：下标上界+1。 例 Dim a(10) As Integer，st(5) As String 本章目录 作用：声明了数组名、类型、维数、数组大小 在内存分配一块连续的区域。 2.多维数组声明 Dim 数组名(下标1，下标2…) [As 类型] 下标数：决定了数组的维数 每一维的大小：上界+1； 数组的大小：每一维大小的乘积。 例 Dim x(2,4) As Long 声明了一个长整型的二维数组 x；共占据3×5个长整型变量的空间 x(1,4) x(1,3) x(1,2) x(1,1) x(1,0) x(2,4) x(2,3) x(2,2) x(2,1) x(2,0) x(0,4) x(0,3) x(0,2) x(0,1) x(0,0) 本章目录 例如，如下数组声明： Dim a(5) As Integer Dim b(5,3) As Integer Dim c(2,5,3) As Integer a（5） b（5,3） c（2,5,3） 3. 动态数组及声明 建立动态数组要分两步： 用Dim 语句声明数组，但不能指定数组大小 Dim 数组名( ) As 数据类型 用ReDim语句动态地分配元素个数 ReDim 数组名 (下标[,下标2…]) 例：Dim s ( ) As Single Sub Form_Load( ) … ReDim s(4，8) … End Sub 本章目录 定义动态数组大小注意： Dim 是说明语句，可出现在程序的任何地方，而ReDim 是执行语句，只能在过程中 在过程中可多次使用ReDim语句来改变数组的大小，但不能改变维数和类型 可在R