当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 阅读程序; 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 ThenFor a = 2 To 6 If arr(i) > a1 Then a1 = arr(i) a2 = i End IfNext i End If P

  

参考答案:

6933

  参考解析

微信端