单项选择题

对窗体编写如下事件过程：　　Option Base 1　　Private Sub Form_KeyPress (KeyAScii AS Integer)　　arr=Array(12，15，18，20，24)　　m1=arr(1)　　m2=1　　If fKeyAscii=12 Then　　For i=2 To 5　　　　If arr(i)＞m1 Then　　　　　　　　m1=arr(i)　　　　　　　　m2=i　　　　End If　　　Next i　　End If　　Print m1　　Print m2　　End Sub　　程序运行之后按回车键，输出结果为

A．12　　1
B．20　　2
C．18　　5
D．24　　12
<上一题 目录 下一题>
热门 试题

单项选择题
有如下函数过程： Function HFC(ByVal x AS Integer，ByVal y As Integer)As Integer Do While y ＜ ＞ 0 sic=x y X=y y=sic Loop HFC=x End Function 以下是该函数的调用过程，该程序的运行结果是 Private Sub Command1 _ Click( ) Dim a AS Integer Dim b As Integer a=12 b=2 x=HFC(a，b) Print x End Sub
A．0
B．6
C．2
D．80
单项选择题
下列程序的执行结果为 a=10 b=20 If a ＜ ＞ b Then a=a + b Else b=b-a Print a，b
A．20 20
B．30 20
C．30 40
D．15 15
相关试题