4
8.2.1 数组的声明
数组的定义（默认：数组下标从 开始 开始） 数组的定义（默认：数组下标从0开始）
一维数组： 一维数组： DIM <数组名 （上界） [AS <数据类型 数组名> 上界） 数据类型>] 数组名 数据类型 例如： 例如： DIM S(3) as integer 个元素： 有4个元素： S(0)、S(1)、 S(2)、 s(3) 个元素 、 、 、 二维数组：先行后列 二维数组： DIM <数组名 （上界 ，上界 ） [AS <数据类型 数组名> 上界1，上界2） 数据类型>] 数组名 数据类型 例如： 例如： DIM M(2,3) M(0,0) M(0,1) M(0,2) M(0,3) M(1,0) M(1,1) M(1,2) M(1,3) M(2,0) M(2,1) M(2,2) M(2,3)
那些用循环 来实现？ 来实现？
12
打印输出Fibonacci数列的前 项 数列的前20项 打印输出 数列的前
【程序】参考程序如下： 程序】参考程序如下： Private Sub Form_Click() Dim n As Integer, fib(1 To 20) As Integer fib(1) = 1: fib(2) = 1 For n = 3 To 20 fib(n) = fib(n - 1) + fib(n - 2) Next For n = 1 To 20 Print fib(n); If n Mod 4 = 0 Then Print ‘每行只打印 个结果 每行只打印4个结果 每行只打印 Next End Sub
5
8.2.2 数组的类型
数组的类型 如果定义数组时指定了类型，则所有元素都是相同的类型。 如果定义数组时指定了类型，则所有元素都是相同的类型。 数组的下标和数组元素 数组中的每一个元素通过数组名和下标来引用。 数组中的每一个元素通过数组名和下标来引用。 例如： 的含义是？ 例如： S(2) ； M(2,2) 的含义是？ 数组的上下界 如果不指定下标的下界，一般默认值为0。 如果不指定下标的下界 ， 一般默认值为 。 可以使用语句 option base 0|1 , 指定默认的下界是 或1。 指定默认的下界是0或 。 注意：该语句放在通用模块中。 注意：该语句放在通用模块中。 也可以在定义时指定上下界。 也可以在定义时指定上下界。 例如： 例如： DIM A(1 TO 7) 数组下标测试函数： 数组下标测试函数：(P119例8-2) 例 LBound(数组名［，维数序号］) 数组名［ 维数序号］ 数组名 UBound(数组名［，维数序号］) 数组名［ 维数序号］ 数组名
