问题
单项选择题
窗体上没有任何控件,编写下列程序: 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 ThenFor i = 2 To 5If a(i)>m1 Then x = a (i) y= iEnd IfNext 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。