VisualBasic程序设计第3版电子教案第7章.pptVIP

（3）ReDim语句用来重新定义数组，能改变数组的维数及上、下界，但不能用其改变可调数组的数据类型，除非可调数组被声明为Variant类型。 （4） 每次使用ReDim语句都会使原来数组中的值丢失，可以在ReDim后加Preserve参数来保留数组中的数据，但Preserve只能用改变多维数组中最后一维的大小，前几维的大小不能改变。 （5）ReDim语句只能出现在过程中。 7.4.2 可调数组的应用举例 【例7.10】编程输出Fibonacci数列：l，1，2，3，5，8，……的前n项。 分析：在例7.6中，是输出Fibonacci数列的前20项，我们使用了固定数组；本例要求输出前n项，n是一个变量，因此，应该使用可调数组。 程序代码如下： Private Sub Command1_Click() Dim Fib() , i%, n% ‘ 避免溢出，定义数组为Variant类型 n = InputBox(输入n的值(n1)) ReDim Fib(n) Fib(1) = 1: Fib(2) = 1 For i = 3 To n Fib(i) = Fib(i - 1) + Fib(