[单项选择题] 窗体上没有任何控件,编写下列程序:
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。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)