单项选择题

有如下一个函数过程：
Function Fun(a As Integer)
Stcitic C
b=0:b=b+1:c=c+1
Fu n=a+b+c
End Function
在窗体上添加一个命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 3
Print Fun(A)：
Next
End Sub
运行该程序，单击命令按钮，输出结果是( )。