十一五国家级规划教材：《Visual Basic程序设计教程》教学资源（PPT课件，第4版）第7章 数组

第7章 数组 7,1数组的基本概念 7.2静态数组与动态数组 7.3数组的基本操作 74控件数组 7.5常用算法与数据结构（二） ☑

第7章 数组 7.1 数组的基本概念 7.2 静态数组与动态数组 7.3 数组的基本操作 7.4 控件数组 7.5 常用算法与数据结构（二）

7.1 数组的基本概念 例 例若我们要求一个班100个学生的平均成绩，然后统计高 于平均分的人数。 按以前简单变量的使用和循环结构相结合，求平均成 绩程序段如下： aver=0 Fori=1 To 100 mark=nputBox("输入"+i+"位学生的成绩") aver aver mark Next i aver=aver /100 但若要统计高于平均分的人数，则无法实现。mark是一个简单 变量，存放的是最后一个学生的成绩。 ☑

引例 例 若我们要求一个班100个学生的平均成绩，然后统计高 于平均分的人数。 按以前简单变量的使用和循环结构相结合，求平均成 绩程序段如下： aver = 0 For i = 1 To 100 mark = InputBox("输入" + i + "位学生的成绩") aver = aver + mark Next i aver = aver / 100 但若要统计高于平均分的人数，则无法实现。mark是一个简单 变量，存放的是最后一个学生的成绩。 7.1 数组的基本概念

7.1.1数组的基本概念 数组是由一定数目的同类元素按一定顺序排列 而成的结构类型数据，是一组具有同一名字、不同 下标的下标变量，其一般形式如下： s(n) 其中称为数组名，是下标。 例如 Dim mark(1 To 100)As Integer Mark数组内存分配示意如下： mark女1) mark(2) mark(i) mark(99) mark女100)

7.1.1数组的基本概念 数组是由一定数目的同类元素按一定顺序排列 而成的结构类型数据，是一组具有同一名字、不同 下标的下标变量，其一般形式如下： s(n) 其中s称为数组名，n是下标。 例如 Dim mark(1 To 100) As Integer Mark数组内存分配示意如下：

7.1.2数组的定义 ①Di:用在窗体模块或标准模块及过程中，定义窗体或标准 模块级数组。 ②ReDim: 用来重新定义动态数组的大小。 ③Static:用来说明该数组为静态数组。 ④Global(Public):用在全局模块中（标准模块）中，说明该数组 变量为全局的。 1.一维数组 形式：Dim数组名（下标下界To]下标上界）As类型名称 2.二维数组 形式：Dim数组名([第1维下标下界To]第1维下标上界 [第2维下标下界To]第2维下标上界)As类型名称 ☑

7.1.2 数组的定义 ①Dim：用在窗体模块或标准模块及过程中，定义窗体或标准 模块级数组。 ②ReDim：用来重新定义动态数组的大小。 ③Static：用来说明该数组为静态数组。 ④Global(Public):用在全局模块中(标准模块)中，说明该数组 变量为全局的。 1.一维数组 形式： Dim 数组名([下标下界To]下标上界) As 类型名称 2.二维数组 形式：Dim 数组名(［第1维下标下界To］第1维下标上界， ［第2维下标下界To］第2维下标上界) As 类型名称

例7-1]定义数组实例及相关概念释义。 DimA(⑤)As Integer A(1)片1 A(2)=2 K=A(1)+A(2) 说明： 上面语句定义的数组A(⑤)中A为数组变量名，（⑤）为下标上界 大小，1 nteger为数组类型名（整型），A(1)为数组元素，(I)为 下标。 ☒

例[7-1] 定义数组实例及相关概念释义。 Dim A(5) As Integer A(1)=1 A(2)=2 K=A(1)+A(2) 说明： 上面语句定义的数组A(5)中A为数组变量名，(5)为下标上界 大小，Integer为数组类型名(整型)，A(1)为数组元素，(1)为 下标

例门-3】用循环方式对数组赋值。 Private Sub Form Click() Dim i as Integer DimA(⑤)As Integer For i=0 To 5 控制循环次数 A(0=i 为数组元素赋值 Next i For i=0 To 5 Print A(i) 分6行输出数组元素 Next i End Sub 第1个For循环将0~5值分别赋给A(0)~A(⑤)如下图： 0 2 4 5 A(0) A(1) A(2) A(3) A(4) A(⑤)

例[7-3] 用循环方式对数组赋值。 Private Sub Form_Click() Dim i as Integer Dim A(5) As Integer For i=0 To 5 ’控制循环次数 A(i)=i ’为数组元素赋值 Next i For i=0 To 5 Print A(i) ’分6行输出数组元素 Next i End Sub 第1个For循环将0～5值分别赋给A(0)～A(5)如下图： A(0) A(1) A(2) A(3) A(4) A(5) 0 1 2 3 4 5

7.1.3 多维数组和数组下标界值 多维数组的定义方法： Dim数组名([第1维下标下界To]第1维下标上界，【第2维 下标下界T0]第2维下标上界，【第3维下标下界To]第3维 下标上界，)As类型名称 Visual Basic提供一对确定下标上界、下界值的函数为LBound 和JBound。其格式为 LBound(数组【，维]) UBound(数组[，维]) LBound返回一个数组中指定维的下界，UBound返回指定 维的上界，其中"数组”是一个数组名，"维”是指要测 试的维

7.1.3 多维数组和数组下标界值 多维数组的定义方法： Dim 数组名(［第1维下标下界 To］第1维下标上界，［第2维 下标下界To］第2维下标上界，［第3维下标下界To］第3维 下标上界，.) As 类型名称 Visual Basic提供一对确定下标上界、下界值的函数为LBound 和UBound。其格式为： LBound(数组［，维］) UBound(数组［，维］) LBound返回一个数组中指定维的下界，UBound返回指定 维的上界，其中“数组”是一个数组名，“维”是指要测 试的维

对于一维数组，参数“维”可以省略，如果要测试多维数 组，则“维”不能省略。如： Dim A(-3 To 4,1 To 2,3 To 5,-1 To 6 )As Integer LBound(A,1)测试A第1维下界为-3，LBound(A,2)测试A第2 维下界为1，UBound(A,1)测试A第一维上界为4， UBound(A,3)测试A第三维上界为5。 国

对于一维数组，参数“维”可以省略，如果要测试多维数 组，则“维”不能省略。如： Dim A(-3 To 4,1 To 2, 3 To 5, -1 To 6 )As Integer LBound(A,1)测试A第1维下界为-3，LBound(A,2)测试A第2 维下界为1，UBound(A，1)测试A第一维上界为4， UBound(A，3)测试A第三维上界为5

7.2 静态数组与动态数组 为了使用数组，必须为数组开辟所需要的内存区域： 根据内存区域开辟的时机的不同，可以把数组分为静 态数组和动态数组。 静态数组：通常把需要在编译时开辟内存区域的数组。 动态数组：需要在运行时开辟内存区域的数组。 7.2.1静态数组及其定义 在声明时就确定了大小的数组称为静态数组。 (1)在全局模块中使用i语句定义。 (2)在窗体或模块级用Di定义。 (3)在过程中用语句定义，或用定义过程 而在过程中使用Dim语句定义数组

7.2 静态数组与动态数组 为了使用数组，必须为数组开辟所需要的内存区域。 根据内存区域开辟的时机的不同，可以把数组分为静 态数组和动态数组。 静态数组：通常把需要在编译时开辟内存区域的数组。 动态数组：需要在运行时开辟内存区域的数组。 7.2.1 静态数组及其定义 在声明时就确定了大小的数组称为静态数组。 (1) 在全局模块中使用Global语句定义。 (2) 在窗体或模块级用Dim定义。 (3) 在过程中用Static语句定义，或用Static定义过程， 而在过程中使用Dim语句定义数组

7.2.2动态数组及其定义 与静态数组相反，动态数组在定义时并不知道数组的大小，要 在运行期确定，并根据需要在运行期可改变数组的大小。 动态数组的定义通常分两步完成： (1)在窗体、标准模块和过程中用Di回或声明一个没有下 标的数组（括号不能省略）。 (2)数组重定义。在过程中需要使用该数组前，用Rcim语句 定义数组的大小（数组元素个数），下标可为常量、变量或表 达式，但变量或表达式此时必须有值。 动态数组定义格式如下： Dim数组名0A类型 定义数组名 】变量名（下标） '(重)定义数组大小

7.2.2 动态数组及其定义 与静态数组相反，动态数组在定义时并不知道数组的大小，要 在运行期确定，并根据需要在运行期可改变数组的大小。 动态数组的定义通常分两步完成： (1) 在窗体、标准模块和过程中用Dim或Public声明一个没有下 标的数组(括号不能省略)。 (2) 数组重定义。在过程中需要使用该数组前，用Redim语句 定义数组的大小(数组元素个数)，下标可为常量、变量或表 达式，但变量或表达式此时必须有值。 动态数组定义格式如下： Dim 数组名() As类型 ′定义数组名 Redim［Preserve］变量名(下标) ′（重）定义数组大小