A-A+

阅读程序;Option Base 1Private Sub Form_ KeyPress (

2022-08-06 06:59:57 问答库 阅读 177 次

问题详情

阅读程序;
Option Base 1
Private Sub Form_ KeyPress (KeyAscii As Integer)
art = Array(268, 542, 693, 365, 489, 147, 852)
a1 = arr(1)
a2 = 1
If KeyAscii = 13 Then
For a = 2 To 6
If arr(i) > a1 Then
a1 = arr(i)
a2 = i
End If
Next i
End If
Print a1; a2
End Sub
程序运行后,按回车键;输出结果是______。请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:693 3
693 3

考点:程序