阅读程序: Function Fun(a As Integer) Static C b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 2 Print Fun(A) ; Next End Sub 运行上面的程序,单击命令按钮,输出结果为
单选题
阅读程序: Function Fun(a As Integer) Static C b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 2 Print Fun(A) ; Next End Sub 运行上面的程序,单击命令按钮,输出结果为