单项选择题

窗体上没有任何控件，编写下列程序：
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

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,

A．
Print a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是A) 8
B．2
C．5
D．11

单项选择题

编写如下两个事件过程： 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

相关试题