单项选择题

执行下列程序，按下回车键后输出结果为______。
Option Base 1
Private Sub From_KeyPress(KeyAscii As Integer)
a=Array(237, 126, 87, 48, 498)
m1=a(1)
m2=1
If KeyAscii=13 Then
For i=2 To 5
If a(i)＞ m1 Then
m1=a(i)
m2=1
End If
Next i
End If
Print m1
Print m2
End Sub

A．48
4
B．237
1
C．498
5
D．498
4

<上一题目录下一题>

热门试题

单项选择题

窗体上有一个图片框和一个命令按钮(拖动模式为自动)，执行程序后，拖动按钮经过图片框时输出结果为 Private Sub Picture1_DragOver(Source As Control, X As Single, Y As Single, State As Integer) Static a As Boolean If Not a Then Print AA a=True End If End Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Shingle, Y As Single) Static b As Boolean If Not b Then Print BB b=True End If End Sub

A．AABB
B．BBAA
C．AA
D．BB

单项选择题

执行下列程序后，在文本框中输入字符“d”，输出结果为______。 Private Sub Form_Load() Text1= End Sub Private Sub Text1_Change() Print Text1.Text End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub

A．D
d
D
B．d
d
D
C．d
D
d
D．D
d
d

相关试题