有如下一个函数过程： Function f(a As Integer) b=0 Static c b=b+1 c=c+1 f=a+b+c End Function 在窗体添加一个命令按钮，事件过程如下： Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print f(a); Next i End Sub 运行该程序，单击命令按钮

如下一个函数过程：

  Function f(a As Integer)

    b=0

    Static c

    b=b+1

    c=c+1

    f=a+b+c

  End Function

在窗体添加一个命令按钮，事件过程如下：

  Private Sub Command1_Click()

    Dim a As Integer

    a=2

    For i=1 To 3

      Print f(a);

    Next i

   End Sub

运行该程序，单击命令按钮，结果为           。

  A：4  4  4  B：4  5  6  C：6  7  8  D：4  7  9