斐波那契(Fibonacci)数列的构成规律是:数列的第一、二个数是1,从第三个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前12项值的过程,请完善之。 Sub Fibonacci(N As Integer,s1) s1=0 f1=1 (11) For i=1 To N/2 Print f1;f2; s1=f1+f2 f1=f1+f2 f2= (12) Next i Print End Sub Private Sub Command1_Click( ) Dim sun As Integer Call Fibonacci(12,sun) Print "Sun=";Sun End Sub