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