中国民航飞行学院Visual Basic 程序设计课件第六章 数组.ppt

Visual Basic程序设计教程 计算机科学教研室 授课教师：李廷元 E-mail: acetao@163.com 第六章 数组 6.1 数组的概念 6.2 静态数组 6.3 动态数组 6.4 数组的基本操作 6.5 控件数组 6.6 自定义数据类型 6.7 常用算法(2) 6.1 数组的概念 【引例】求一个班100个学生的平均成绩，统计高于平均分的人数 (1) 求一个班100个学生的平均成绩 6.1 数组的概念 (2) 统计高于平均分的人数 已知平均成绩aver,高于平均分的人数用overn表示 6.1 数组的概念 2. 定义100个简单变量 Dim mark1%, mark2%, ... , mark99%,mark100% mark1 = InputBox(输入第1个学生的成绩) mark2 = InputBox(输入第2个学生的成绩) … mark99 = InputBox(输入第99个学生的成绩) mark100 = InputBox(输入第100个学生的成绩) aver = (mark1 + mark2 +... + mark99 + mark100)/100 If mark1 aver Then overn = overn + 1 If mark2 aver Then overn = overn + 1 … If mark99 aver Then overn = overn + 1 If mark100 aver Then overn = overn + 1 6.1 数组的概念 数组是一组变量的集合 一个数组名代表逻辑上相关的一批数据，用下标表示该数组中的各个元素 数组必须先声明后使用 Dim mark (1 To 100) As Integer 6.1 数组的概念 3.用数组统计高于平均分的人数 6.1 数组的概念 数组的有关概念 数组的维数：下标的个数 一维数组：一个下标 二维数组：二个下标 静态(Static)数组：声明时确定了大小的数组 动态(Dynamic)数组：声明时没有确定大小的数组 6.1 数组的概念 数组为什么要先定义？ 声明数组的名称、类型、维数、大小 根据数组的名称、类型、维数、大小为数组开辟存储空间 6.2 静态数组 6.2.1 静态数组的定义 6.2.2 Option语句 6.2.3 数组下标测试函数 6.2.1 静态数组的定义 一维数组定义格式： Dim 数组名(下标) [As 类型] 二维数组定义格式： Dim 数组名(下标1, 下标2) [As 类型] 注意： 数组名的规定遵循变量名的规则 数组名不能与变量名相同 下标只能是常量 6.2.1 静态数组的定义 一维数组定义格式： Dim 数组名(下标) [As 类型] 二维数组定义格式： Dim 数组名(下标1, 下标2) [As 类型] 注意： As 类型：说明数组的类型 类型可以是：Integer、Long、Single、Double、String 6.2.1 静态数组的定义 数组定义实例 Dim a%(10) 或 Dim a (10) As Integer 数组a是一个一维整型数组，共有11个元素，下标范围从0～10 6.2.1 静态数组的定义 数组定义实例 Dim b (3, 4) As Long 数组b是一个二维长整型数组，第一维的下标范围从0～3,第二维的下标范围从0～4, 共有4×5个数组元素 6.2.1 静态数组的定义 数组定义实例 Dim c (-2 To 2) As String*20 数组c是一个一维定长字符串数组，下标范围从-2～2, 共有5个数组元素 6.2.1 静态数组的定义 数组定义实例 Dim d(20) As String 数组d是一个一维可变长度字符串数组，下标范围从0～20, 共有21个数组元素 6.2.2 Option语句 格式：Option Base n 功能：用来指定数组下标的默认下界 说明： n的值只能取0或1 Option Base不能出现在过程中，必须将其放在数组定义之前 若定义的是多维数组, Option Base 对每一维都有效 6.2.2 Option语句 数组定义实例 Option Base 1 … Dim a(10) As Integer 数组a是一个一维整型数组，共有10个元素，下标范围从1～10 6.2.2 Option语句 数组定义实例 Option Base 1 … Dim x(5, 5) As String 数组x是一个二维不定长字符数组，共有5×5个元素，每一维下标的下界均从1开始 6.2.3 数组下标测试函数 格式： Lbound ( 数组名[, 维] ) Ubound ( 数组名[, 维] ) 功能： Lbou