数组一.pptVIP

数 组 * 第五章 数 组 5.1 数组的概念 5.2 数组声明及初始化 5.3 重定义数组大小 5.4 数组的基本操作和排序 5.5 结构类型及其数组 5.6 综合应用 本章目录 5.1 数组的概念 一、问题的提出 例5.1 求100个学生的平均成绩，并统计高于平均分的人数。用简单变量和循环，求平均成绩程序段如下： aver = 0 For i = 1 To 100 mark = InputBox(输入学生成绩) aver = aver + mark Next i aver = aver / 100 问题 （1）mark只能放一个学生的成绩，无法统计高于平均分的人数。重复输入、不保证输入的一致性。 （2）若用简单变量保存100个学生的成绩，则需定义100个变量和使用100句输入语句。 XX mark 用数组解决问题的程序如下： Dim mark(99) As Integer 声明数组mark Dim aver!, overn%, i% aver = 0 For i = 0 To 99 输入成绩，求分数和 mark(i) = InputBox(输入学生的成绩) aver = aver + mark(i) Next i aver = aver / 100 求100人的平均分 overn = 0 For i = 0 To 99 统计高于平均分的人数 If mark(i) aver Then overn = overn + 1 Next i MsgBox(平均分: aver 高于平均分人数: overn) mark(0) mark(1) mark(3) …… mark(97) mark(98) mark(99) 数组: 一组相同类型的变量的集合。 作用：用一个数组名代表逻辑上相关的一批数据，用下标表示该数组中的各个元素，和循环语句结合使用，使得程序书写简洁。 使用：必须先声明后使用 数组的概念 Dim mark(99) As Integer 声明一个一维整型数组mark ，共有100个元素，下标范围为 0 ~ 99 ； 各元素是mark(0)，mark(1)，…，mark(99)； mark(i)表示由下标i的值决定是哪一个元素。mark数组内存分配如下： mark(99) mark(98) … mark(2) mark(1) mark(0) 下标不能超出数组声明时的上、下界范围，否则会产生“索引超出了数组界限”。 数组元素的使用规则与同类型的简单变量相同。 5.2 数组声明及初始化 一维数组 Dim 数组名(下标上界) [As 类型] 下标上界：常数、已有值的表达式或变量。 下标下界为0。 数组的大小为：下标上界+1。 例 Dim a(10) As Integer，Dim st(5) As String 声明了一维整型数组a、有11个元素；下标的范围0～10。若在程序中使用a(11)，则系统会显示“索引超出了数组界限”。 st是一维字符串数组、有6个元素；下标的范围0~5。 多维数组声明 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) 数组的初始化 VB.NET提供了对数组的初始化功能，也就是在定义数组的同时，为数组元素赋初值。形式： Dim 数组() As 类型 ={常量1，…，常量n} ’一维 Dim 数组(，) As 类型 ={{行1常量}，…，{行m常量}} 例 Dim x(,) As Integer = {{1,2,3,4}, {5,6,7,8}} 1 2 3 4 5 6 7 8 数组x 5.3 重定义数组大小 对已经存在的数组可用ReDim语句改变数组大小 ReDim 数组名 (下标[,下标2…]) 例 Dim sArray(2,3 ) As Single Sub Form1_Load( )