对窗体编写如下代码:
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
程序运行后,按回车键,输出结果为()
答案不对?请尝试站内搜索