斐波那契(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 sum As Integer
　　Call Fibonacci(12， sum)
　　Print "Sum = "; sum
End Sub