窗体上没有任何控件，有下列下列程序：
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 i
　　End If
　　Print x; y
End Sub

A．5　1

B．9　5

C．2　2

D．7　3