[单项选择题] 窗体上没有任何控件，编写下列程序： Option Base 1 Private Sub Form_KeyPress(KeyAscii As Integer) a = Array(5,

16 查阅

[单项选择题] 窗体上没有任何控件，编写下列程序：

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

参考答案:

B解析：[分析]：按下回车键后，KeyAscii的值为13。程序的功能是：变量x记录数组中最大的值，变量v记录最大值在数组中的位置。现假定最大值在第一个数组元素中，然后逐个进行比较，如果某个数大于x中的数，就将该数重新赋值给x，同时也将下标值赋值给y，最后输出9和5。