Visual Basic程序设计 双色印刷 教学课件 作者 熊李艳 周美玲 第6章 数组.pptVIP

第六章 数组 本章主要内容：  数组的定义 数组的输入和输出 控件数组 数组的应用 6．1 数组的概念 【例6.1】求斐波那契数列前30项的和；该数列首两项等于1，而从第三项起，每一项是之前两项之和。 分析：通过前面的学习，我们可以通过三个变量来实现，数据分析如下： 1 1 2 3 5 8 13 21…… 第一次：f1 f2 f3 第二次： f1 f2 f3 第三次： f1 f2 f3 …… 简单变量编程 f1 = 1: f2 = 1 f1,f2代表第一项和第二项 Print Tab(0); f1; Tab(10); f2; 输出前二项 For i = 3 To 30 f3 = f1 + f2 求第三项 Print Tab(((i-1) Mod 10) * 10); f3; ‘利用tab函数定位输出 f1 = f2 假设原来的第二项为第一项 f2 = f3 假设原来的第三项为第二项 Next i 用数组实现: f(1) = 1: f(2) = 1 f(1),f(2)代表第一项和第二项 Print Tab(0); f(1); Tab(10); f(2); 输出前二项 For i = 3 To 30 f(i) = f(i - 1) + f(i - 2) 求第i项为前二项之和 Print Tab(((i - 1) Mod 10) * 10); f(i); Next i End Sub 上述的解法简单明了 6．1．1 数组与数组元素 数组不是一种数据类型，而是使用同一个名字的一组相同类型变量的集合。在同一数组中，构成该数组的成员称之为数组元素。 dim score(30) 上述语句为我们定义了一个一维数组，我们称之为score其共有31个数组元素，他们分别表示如下： score(0) score(1) score(2) score(3) score(4) ……score(30) 6．1．2 下标与数组的维数 为了确定各数据与数组中每一个单元的一一对应关系，每个数组元素都有一个编号，称之为下标。 下标变量中下标变量的个数称为维数，因此，一个下标的下标变量称之为一维数组，两个下标的下标变量构成二维数组。 例：下面的语句声明了一个 10 × 10 共100个数据元素的二维数组。 Dim Maxas (9, 9) As Double 6．2数组的声明与应用 6．2．1静态数组的声明 其大小不可改变的数组 1、一维数组 ⑴　声明格式： Dim| 数组名（下标） [As 类型][，数组名（下标）[As 类型]]…… 功能：定义一个静态数组的名称、类型、数组的维数及元素的个数。 说明： 数组名应是合法的变量名。可同时声明多个数组，各数组之间用逗号分割。 下标必须为常数，不可以为表达式或变量。 数组的维数由下标的个数决定，最多不能超过60。 下标值若是非整数，则自动取整。 下标变量都具有相同的数据类型。 当As类型缺省或数据类型为 Variant时，都是变体类型。 声明数组时，在数组名之后跟一个用括号括起来的上界。上界不得超过 Long 数据类型的范围（-2,147,483,648 到 2,147,483,647）。 ⑵　设置上下界 下标的格式： [下界to] 上界 一维数组的大小为：上界-下界+1 例如： Dim Counters (1 To 15) As Integer Counters 的下标(索引值范围)从 1 到 15 。 ⑶ UBound 函数和LBound 函数 格式：UBound(数组名[, 维数]) 功能：返回一个长整型数据，其值为指定的数组某一维可用的最大下标。 例如：Dim A(1 To 100, 0 To 3, -3 To 4) 语句 返回值 语句 返回值 LBound(A, 1) 1 UBound(A, 1) 100 LBound(A, 2) 0 UBound(A, 2) 3 LBound(A, 3) -3 UBound(A, 3) 4 ⑷ Option Base 语句 格式：Op