单项选择题

运行下面的程序，单击命令按钮，输出结果为( )。
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 SubA) 3
3
3
B．3
4
5
C．3
5
7
D．3
6
9
<上一题 目录 下一题>
热门 试题

单项选择题
下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form Click() Dim i As Integer Dim sum As Long Dim t As Long t=1:sum=0 For i=1 To 3 t=t*i sam=sum+t Next i Print sum End Sub
A．3
B．9
C．5
D．6
单项选择题
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Commmad1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是( )。
A．4321
B．12
C．34
D．1234
相关试题