VB程序设计5-数组.pptVIP

5.1 数组的定义 同类变量的一个有序集合。 数组中的变量称为数组元素。 数组的表示： 数组名（s1,s2…） 其中s1，s2…表示该元素在数组中的位置，即下标。 只有一个下标的叫一维数组，两个下标的叫二维数组…。 下标必须为整数 下标的范围：下界 — 上界 数组在使用前必须定义。 两种类型：固定大小数组 动态数组 定义形式： Public/Private/Static/Dim 数组名（下标）[As 数据类型] 数据类型缺省为Variant类型。 数组也分局部、窗体和全局三个作用域。 下标必须为常量（数值常量或符号常量），不能为变量（该变量已经被赋值也不能）。 常量、变量、数组的说明总结 请记住 1、不管是说明常量、变量还是数组，Public和Private不能用在过程中，Static不能用在通用说明部分。 2、在窗体模块中，不能定义公有常量、公有定长字符串变量和公有数组。 Dim A(6) As Integer 等价于Dim A(0 To 6) As Integer 必须位于模块的通用部分。 Option Base 1 将数组下标的缺省下界设置为1 一维数组：线性顺序。 二维数组：由行和列组成的一张二维表。经常用二维数组表示数学中的矩阵。 三维数组：由行、列和页组成的三维表。 LBound函数：LBound(aname[,d]) 返回数组某维的维下界的值。 UBound函数：UBound(aname[,d]) 返回数组某维的维上界的值。 Erase语句：Erase a1[,a2,…] 重新初始化固定大小数组的元素，或者释放动态数组的存储空间。 For Each-Next结构语句： For Each Element In array/object set [语句组] [Exit For] [语句组] Next [Element] 1. 用赋值语句 2. 用循环语句 3. 用InputBox函数 4. 用Array函数给一维数组赋值 变体变量名=Array（[数据列表]） 不可以用Array函数给非Variant类型的变量赋值。 5. 数组赋值 6. 通过文本框给数组元素赋值 利用循环控制数组元素的输出 动态数组 固定大小数组：指定了数组的维数和下标，在使用过程中不得改变。 动态数组：声明时不指明维数和下标，在使用时可利用ReDim重新定义。 ReDim [Preserve] 数组名（下标）[As 数据类型] 若使用Preserve选项，则： 保留原数组中的所有内容。 保留维的大小（最末维除外） 保留维数。 动态数组的声明和重定义 声明： Dim 数组名( ) [As 数据类型] 重定义： ReDim [preserve] 数组名(下标) 例：Dim A( ) As Integer …… ReDim A(5) …… ReDim Preserve A(10) …… 注 意 可以使用 ReDim 语句反复地改变数组的元素以及维数的数目，但是不能在将一个数组定义为某种数据类型之后，再使用 ReDim 将该数组改为其它数据类型。 如果使用了 Preserve 关键字，就只能重定义数组最末维的大小，不能改变维数的数目。 控件数组 控件数组是由一组具有共同名称和相同类型的控件组成，数组中的每一个控件共享同样的事件过程。 控件数组的名字由Name属性指定，下标由Index属性指定，范围：0～32767 Index属性值作为参数传递给事件过程。 5.4 数组应用示例 例5-4 随机生成15个两位整数存放在数组中,并输出到窗体，5个一行，同时求其和与平均值，平均值保留两位小数。 例6-5 随机生成10个两两互质的数，并按从大到小的顺序存放到列表框 例5-8 顺序查找程序。 例5-10 用冒泡法将10个数按从小到大排序 例5-11 二分查找程序 例6-14 找出从1~9这9个数字中任取6个不同的数字组成的素数 例6-15 使用控件数组，编写一个能进行加减乘除运算的运算器 本章作业 随机产生20个10~99之间的整数存入一维数组A(20)中，并： （1）按5个一行分别输出到窗体、图片框、文本框 （2）输出到列表框 随机产生20个10~99之间的整数存入二维数组A(4，5)中，并按4行5列的形式分别输出到窗体、图片框、文本框中。 找出二维数组A(3，4)中的最大和最小元素及其位置。 练习题10（方法1） A11 A12 A13 A14 A15 A21 A22 A23 A24 A25 A31 A32 A33 A34 A35 A41 A