单项选择题

有如下一个函数过程:
Function Fun(a As Integer)
Static c
b=0:b=b+1:c=c+1
Fun=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
运行该程