vb程序设计教程之数组幻灯片.ppt

第5章 数组 5.1 数组 5.2 数组的基本操作和排序 5.3 列表框和组合框控件 5.4 综合应用 5.1 数组 5.1.2 数组声明 说明： 如果要定义下标下界为1，必须在数组定义之前，用option base 1 用dim定义数组时，如果把数组定义为数值型，则被初始化为0；如果定义为字符串，则被初始化为空字符串。 在同一过程中，数组名不能与其他数组名或变量名相同。 例如： option base 1 Dim Counters (1 To 15) As Integer ‘15 个元素，整型 Dim Sums (15) ‘15 个元素, 变体类型。 分清楚数组的定义和使用，例如： Dim a(5) as integer a(1)=1 ‘给下标为1的数组元素赋值 a(5)=2 k=a(1)+a(5) print k ‘运算，结果为3 2. 多维数组声明 5.1.3 静态数组与非静态数组 静态数组 定义数组时，就确定了数组的大小，数组元素的值一直要保持到整个应用程序退出时，所占内存才会释放。 实现这种功能的方式： 在全局模块中使用global语句定义 在窗体模块中用dim定义数组 在private过程中使用Static 语句定义数组； 用static定义过程，在过程中使用dim语句定义数组。 5.1.4 动态数组及声明 定义动态数组大小注意： 每次执行 ReDim 语句时，当前存储在数组中的值都会全部丢失。 在redim语句后使用了preserve(保存)，则不清除原数组中的内容，但只能改变最后一维的大小（不能改变数组的维数） 格式： ReDim preserve 数组名 （下标） 5.2 数组的基本操作 1）对于数组元素较少的数组，可以通过单个赋值语句进行输入操作： dim a(5) ‘变体类型 a(0)=100 a(1)=“hello” a(2)=“are” a(3)=3.14 a(4)=3.1415926 2）对于数组元素较多的数组，利用for循环和inputbox函数或随机函数输入： for单循环为一维数组赋值 嵌套for循环为二维数组赋值 注意：下标不要越界 2、数组的输出 以数组的元素为操作对象，用Print方法输出 3. 确定数组的上界值和下界值的函数 Lbound(数组名[,维数])函数来测试数组的下界 Ubound(数组名[,维数])函数来测试数组的上界 注：一维数组时，维数可以省略，多维数组时不能省略。 例如：Dim MyArray（20） Lower = LBound(MyArray) ‘返回 0。 dim TwoDArray(-3 to 4, 1 to 2) Lower = LBound(TwoDArray, 1) ‘返回 -3 Upper = UBound(TwoDArray, 2) ‘返回2 4.一维数组的初始化函数array Vb提供了array函数, 使数组在编译阶段被初始化，即得到初始值 格式： 数组变量名＝Array(数组元素初始值) 例如：d=array(1,2,3,5,6,8,9) 相当于： 下界为0的情况： dim d(6) as integer d(0)=1: d(1)=2: d(2)=3: d(3)=5 d(4)=6: d(5)=8: d(6)=9 数组变量名＝Array(数组元素初始值) 说明： 初始值与相应数组元素一一对应，初始值之间用逗号隔开。 数组变量名可以不定义而直接由Array函数确定数组变量的个数。 如果数组变量名在初始化之前已经定义的数组名，只能是Variant数组类型 例如：dim d 或者 dim d as variant 5、求数组和、最值、位置及交换元素 6、数组排序 （2）冒泡法排序 （3）插入数据 （4）删除数据 5.3 列表框和组合框控件 列表框属性： List： （1）在设计时通过属性窗口为list属性赋值，输入后按下ctrl+enter输入下一项。 （2）list是一个字符型的数组，数组下标从0开始，存放列表框的项目。list(0),list(1)… （3）可以读取这一属性的值 [列表框名].List(下标) （4）运行时修改list(n)的值 例如：list1