更多"假定编写了如下4个窗体事件的事件过程，则运行应用程序并显示窗体后，已经"的相关试题:
[单项选择]对窗体编写如下事件过程：
Private Sub Form _ MouseDown(BuRon As Integer，Shift As Integer, X As Single，
Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print "BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______。
A. AAAAA
B. BBBBB
C. AAAAA
D. BBBBB
[单项选择]对窗体编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer，Shift As Integer,X As Single，
Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print "BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______ 。
A. AAAAA
B. BBBBB
C. AAAAA
D. BBBBBAAAAA
[填空题]某个窗体已编写如下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 ______。
Private Sub Form_Click（ ）
Dim K as Integer,n as Integer,m as Integer
n=10：m=1:k=1
DoWhileK＜=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
[填空题]把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后，如果按下B键，则在窗体上输出的数值是【 】和【 】。
[填空题]把窗体的KeyPreview属性设置为True，并编写如下两个事件过程：
Private Sub For_KeyDown(KeyCode As Integer，Shift As Integer)
Print KeyCode
End Sub
Private Sub Fora_KeyPress(Key Ascii AS Integer)
Print Key Ascii。
End Sub
程序运行后，如果按下A键，则在窗体上输出的数值为 【12】 和 【13】 。
[填空题]把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后，如果按下B键，则在窗体上输出的数值是 【12】 和 【13】 。
[填空题]把窗体的KeyPreview属性设置为True，并编写如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
Print KeyCode；
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后，如果按下A键，则在窗体上输出的数值为 【11】 和 【12】 。
[单项选择]在窗体上添加一命令按钮，名称为Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为
Option Base 1
Private Sub Command1_Click（ ）
Dim a As Variant
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next
Print s
End Sub
A. 4321
B. 1234
C. 34
D. 12
[填空题]在窗体上面有一个列表，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
List1.RemoveItem1:List1.RemoveItem2
List1.RemoveItem3
End Sub
Private Sub Form_Load（ ）
List1.AddItem"ItemA":List1.Addhem"ItemB"
List1.AddItem"ItemC":List1.Addhem"ItemD"
List1.AddItem"ItemE"
End Sub
运行上面的程序，然后单击窗体，列表框中显示的项目是______。
[单项选择]假定有如下的窗体事件过程：
Private Sub Command1_Click（ ）
a$="Microsoft Visual Basic"
b$=Riqht(a$, 5)
c$=Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是______。
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]把窗体的KeyPreview属性设置为True，然后编写如下事件过程
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim ch As String
ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(ch))
PrintChr(KeyAscii+2)
End Sub
程序运行后，按键盘上的“A”键，则在窗体上显示的内容是
A. A
B. B
C. C
D. D
[填空题]在窗体上画一个列表，然后编写如下两个事件过程。
Private Sub Form_Click（ ）
List1.Removeltem 1
List1.Removeltem 2
End Sub
Private Sub Form_Load（ ）
List1.Addltem"ItemA"
List1.Addltem"ItemB"
List1.Addltem"ItemC"
List1.Addltem"ItemD"
List1.Addltem"ItemE"
End Sub
运行上面的程序，然后单击窗体，列表框中显示的项目是______。
[填空题]在窗体上画一个列表框，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
List1．RemoveItem 1
List1．Removeltem 3
List1．RemoveItem 1
End Sub
Private Sub Form Load（ ）
List1．AddItem "ItemA"
List1．AddItem "ItemB"
List1．AddItem "ItemC"
List1．AddItem "ItemD"
List1．AddItem "ItemE"
End Sub
运行上面的程序，然后单击窗体，列表框中所显示的项目为 【10】 。
