窗体上没有任何控件,有下列下列程序: 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)> ml Then x = a(i) y = i End If Next
单选题
窗体上没有任何控件,有下列下列程序: 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)> ml Then x = a(i) y = i End If Next