[填空题] 斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善程序。 Sub Fibona

[填空题] 斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前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 sum As Integer

Call Fibonacci(12，sum)

Print "Sum="；sum

End Sub