单项选择题

阅读程序：
Function Fun( a As Integer)
Static c
b=0:b=b+2:c=c+2
F=abc
End Function
Private Sub Commandl _ Click( )
Dim a As Integer
a=2
For i = 1 To 2
Print Fun (

A．;
Next
End

<上一题目录下一题>

热门试题

填空题

单项选择题

阅读程序： Function Fun( a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Commandl _ Click( ) Dim a As Integer a=2 For i = 1 To 2 Print Fun (