VB程序设计数组ppt课件.ppt

《VB程序设计数组ppt课件.ppt》由会员分享，可在线阅读，更多相关《VB程序设计数组ppt课件.ppt（39页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、Visual Basic Visual Basic 程序设计程序设计目 录 前言 第1讲 第2讲 第3讲 第4讲 第5讲 第6讲 第7讲 第8讲 第9讲 第第1010讲讲 第11讲 第12讲 第13讲 第14讲 第15讲 第16讲回顾上一讲学习的内容 判断条件执行循环判断条件执行循环WhileWhilewendwendDo WhileDo WhileLoopLoopDo UntilDo UntilLoopLoopDo Do Loop While Loop WhileDo Do Loop Until Loop Until上机实验中的问题 求累加和SUM=SUM+K （sum的初始值一定是0） 求

2、连乘SUM=SUM*K（sum的初始值一定是1） 程序填空题：特别要注意选择结构和循环结构的完整性。第六章第六章 数组数组 （4 4学时）学时）6.1 6.1 数组的引入数组的引入6.2 6.2 数组的声明数组的声明6.3 6.3 动态数组及声明动态数组及声明6.4 6.4 数组的基本操作数组的基本操作6.5 6.5 控件数组控件数组6.6 6.6 自定义数据类型自定义数据类型6.7 6.7 数组应用数组应用6.8 6.8 常见错误常见错误 1.1.数组概念数组概念按以前简单变量的使用和循环结构相结合，求平均成绩程序段如下： aver = 0 For i = 1 To 36 mark = In

3、putBox(输入第 + i + 位学生的成绩) aver = aver + mark Next i aver = aver / 1006.1 6.1 数组的引入数组的引入 若要统计高于平均分的人数，则无法实现。mark是一个简单变量，存放的是最后一个学生的成绩。已有知识解决方法：再重复输入成绩，这样又带来两个问题： （1）输入数据的工作量成倍增加； （2）若本次输入的成绩与上次不同，则统计的结果不正确。解决此问题的根本方法，需引入数组，保存输入的数据，一次输入，多次使用。数组的概念整型一维数组N(1)N(1)N(2)N(2)N(9)N(9)N(10)N(10)数组的概念2.数组的逻辑结构和存

4、储结构N (1)N (2)N (3)N (4)N (5)N (6)N (7)N (8)例如：声明一维整型数组例如：声明一维整型数组N(8) Dim N%(8)N(8) Dim N%(8)N(8)N(8)在内存中排列示意图：在内存中排列示意图：二维数组的逻辑结构二维数组的存储结构W(0,0)W(0,0)W(0,1)W(0,1)W(0,2)W(0,2)W(1,0)W(1,0)W(1,1)W(1,1)W(1,2)W(1,2)W(3,0)W(3,0)W(3,1)W(3,1)W(3,2)W(3,2)数组又有两种情况：数组又有两种情况： 静态静态( (定长定长) )数组数组 动态动态( (可变长可变长)

5、)数组数组6.2 6.2 数组的声明数组的声明1.静态数组2.2.静态数组声明静态数组声明静态数组声明语句形式静态数组声明语句形式（以以dimdim为例为例） : : Dim Dim 数组名数组名( (下标下标1,1,下标下标2 2) As ) As 类型类型 声明了数组的名、维数、大小、类型声明了数组的名、维数、大小、类型维数：有维数：有N N个下标称为个下标称为N N维数组，维数组，N=1,2N=1,2，最多最多6060维。维。下标下标: : 下界下界 To To 上界上界 省略下界默认为省略下界默认为0 0，下标，下标每一维大小每一维大小: : 上界上界- -下界下界+1+1数组大小数组

6、大小: : 每一维大小的乘积每一维大小的乘积例：例： dim x(9) as integerdim a(10,10) as long说明：说明：下下标标下界为下界为0 0。（2 2）如果需要数组的下标下界从）如果需要数组的下标下界从1 1开始，开始，可以：可以：dim x%(1 to 9),a&(1 to 10,1 to 10)dim x%(1 to 9),a&(1 to 10,1 to 10)或使用或使用option baseoption base语句：语句：option base 1option base 1说明：Option baseOption base语句只能出现在窗体通用段或标准语

7、句只能出现在窗体通用段或标准模块中，不能出现在过程中，且必须在数组定模块中，不能出现在过程中，且必须在数组定义语句之前。义语句之前。默认下标值对每一维都有效。默认下标值对每一维都有效。数组声明语句格式1数组声明语句。 例：例：dim a(-2 to 10) as integerdim b(10 to 100) as longdim c(1 to 10 , 11 to 20) as single 数组下界上界的测试函数 默认数组数据类型为Variant的数组称默认数组。定义时省略As类型说明。数组中元素的类型可以不同。例例1：Dim mark(1 to 100) As Integer例例2：Di

8、m lArray( 0 To 3，0 To 4) As Long: Dim lArray(3，4) As Long声明了Larray数组共有20（ 45）个元素6.3 动态数组动态数组的定义和声明动态数组的定义和声明 动态数组定义动态数组定义动态数组声明的几点说明：动态数组声明的几点说明：6.4 数组的基本操作 (1)用循环和赋值语句 For i = 1 To 10 iA(i)=i Next I(2)Array函数 Dim ib As Variant ib =Array(abc, def, 67) For i = 0 To UBound(ib) Picture1.Print ib(i); ;

9、Next i1.1.数组元素的赋值数组元素的赋值Array函数数组变量名数组变量名 For i = 0 To UBound(a) b(i) = a(i)Next i注意：赋值号左边的数组只能声明为Variant的可调数组或简单变量。数组的赋值数组的赋值在VB6.0中，提供了数组直接对数组的赋值。例如： Dim a( ) As Variant, b( ) As Variant, i% Dim a( ) As Variant, b( ) As Variant, i% a = Array(1, 2, 3, 4, 5) a = Array(1, 2, 3, 4, 5) ReDim b(UBound(a

10、) ReDim b(UBound(a) b = a b = aDim Max As Integer, iMax As IntegerDim ia(1 to 10) as integer Max=iA(1)：iMax=1For i = 2 To 10 If iA(i)Max Then Max=iA(i) iMax=i End IfNext I2.2.数组元素的引用数组元素的引用 例例1 1：求数组中的最大元素及所在下标：求数组中的最大元素及所在下标ia(1) ia(2) ia(3) ia(4) ia(5) ia(6) ia(7) ia(8) ia(9) ia(10)maximax数组元素的引用数

11、组元素的引用 例例2 2： 交换数组中各元素交换数组中各元素For i =1 To 102For i =1 To 102 t=iA(i) t=iA(i) iA(i)=iA(10-i+1) iA(i)=iA(10-i+1) iA(10-i+1)=t iA(10-i+1)=tNext INext I3. 3. 二维数组的输入和输出二维数组的输入和输出数组输入和赋值举例数组输入和赋值举例4.4.数组的数组的清除清除问题讲解 简单变量与数组变量的区别: AIA(I) I=1,2,310A(1)A(1)A(2)A(2)A(3)A(3)A(4)A(4)A(5)A(5)A(6)A(6)A(7)A(7)A(8

12、)A(8)A(9)A(9) A(10)A(10)小结小结:动态数组示例：动态数组示例： 4.使用数组的注意事项 使用数组的注意事项 在同一个运行环境下，数组名不能与在同一个运行环境下，数组名不能与简单变量名相同。简单变量名相同。下标变量的使用与简单变量一样。下标变量的使用与简单变量一样。本讲小结本讲重点学习了：要求要求 熟练掌握一维数熟练掌握一维数组和二维数组的组和二维数组的定义和应用。定义和应用。作业和实验题目作业和实验题目作业作业：1.1.复习教材六章已讲内容；复习教材六章已讲内容；2.2.预习教材第六章未讲内容。预习教材第六章未讲内容。上机实验上机实验：1.1.继续完成继续完成实验六、实验七实验六、实验七；2.2.上机完成补充实验二、补充实验三。上机完成补充实验二、补充实验三。