对窗体编写如下代码：

Option Base1

Private Sub Form_Key Press（Key Ascii AsInteger）

a=Array（237，126，87，48，498）

m1=a（1）

m2=1

IfKey Ascii=13Then

ForI=2To5

Ifa（I）>mlThen

m1=a（j）

m2=I

EndIf

NextI

EndIf

Printm1

Printm2

EndSub

程序运行后，按回车键，输出结果为（）

A . 499

B . 237

C . 498