单项选择题

有如下程序：
Function F(a As Integer)
b = 0
Static C
b = b + 1
c = c + 2
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
 
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1 Click() Dim a a=Array(1， 2， 3， 4) j = 1 For i = 4 To 1 Step -1 s = s + a(i)* j i = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果为
A．4321
B．12
C．34
D．1234
单项选择题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m 10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．41 54
B．2 54
C．1 3
D．42 3
相关试题