单项选择题

阅读程序：

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

&nbs
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下两个事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住“Shift”键和锁定大写键时) 运行程序，如果按“A”键，则程序输出的结果是
A．A

A

B．a

A

C．A

a

D．a

a
单项选择题
下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer，y(5) As Integer For i=1 to 10 x(i) =10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub
A．3 7 11 45 19
B．19 15 11 7 3
C．1 3 5 7 9
D．不确定的值
相关试题