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

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

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

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

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。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zaji/5602839.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-12-15
下一篇 2022-12-15

发表评论

登录后才能评论

评论列表(0条)

保存