单项选择题

窗体上没有任何控件，有下列程序：
Option Base 1
Private Sub Form_KeyPress(KeyAscii As Integer)
a=Array(5，2，7，6，9)
x=a(1)
y=1
If KeyAscii=13 Then
For i=2 To 5
If a(i)＞m1 Then
x=a(i)
y=i
End If
Next i
End If
Print x；y
End Sub
执行程序后，按下回车键后输出结果为______。

A．5 1
B．9 5
C．2 2
D．7 3
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下通用过程： Sub Proc(x As Single，y As Single) t=x X=t y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim a As Single Dim b As Single a=5 b=4 Proc a，b Print a，b End Sub 程序运行后，如果单击命令按钮，则输出结果为______。
A．5 4
B．1.25 1
C．4 5
D．1.25 5
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim a(4)As Integer，x As Integer，sum As Integern=4:sum=0 a(1)=1 For k=0 To n-1 For i=1 To k+1 x=k+2-i a(x)=a(x)+a(x-1) If x＜n-k Then Exit For sum=sum+a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
A．5
B．6
C．8
D．11
相关试题