单项选择题

窗体上有文本框Text1，执行下列程序后在文本框输入123abc，单击按钮后输出结果为
Private Sub From_Load()
Text1.Text=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii)
KeyAscii=Asc(UCase(Char))
Eud Sub
Private Sub Command1_Click()
Print Text1.Text
End Sub

A．123ABC
B．ABC
C．!@#ABC
D．123abc
<上一题 目录 下一题>
热门 试题

单项选择题
执行下列程序，按下回车键后输出结果为______。 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
相关试题