单项选择题

有如下程序:  Private Sub Commandl_Click()   Dim a As Integer   a=2   For i=1 To 3     Print Gad (

A.

     Next i

  End Sub

  Function Gad (a As Integer)

   b=0

   Static c

   b=b + 1