更多"假定有如下的窗体事件过程： Private Sub Form_Cli"的相关试题:
[单项选择]假定有如下的窗体事件过程：
Private Sub Form_Click（ ）
a$="Microsoft Visual Basic"
b$=Right(a$，5)
c$=Mid(a$，1，9)
MsgBox a$，34，b$，c$，5
End Sub
程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
[单项选择]假定有如下事件过程：
Private Sub Form MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)
If Button=2 Then
PopupMenu popForm
End if
End Sub
则以下描述中错误的是______。
A. 该过程的功能是弹出一个菜单
B. popForm是在菜单编辑器中定义的弹出式菜单的名称
C. 参数X、Y指明鼠标的当前位置
D. Button＝2表示按下的是鼠标左键
[单项选择]假定有如下事件过程：
Private Sub Form_MouseDown(Buaon As Integer，Shift As Integer，x As Single，y_As Single)
If Button=2 Then
PopupMenu popForm
End If
End Sub
则以下描述中错误的是
A. 该过程的功能是弹出一个菜单
B. popForm是在菜单编辑器中定义的弹出式菜单的名称
C. 参数x、y指明鼠标的当前位置
D. Button=2表示按下的是鼠标左键
[单项选择]假定有如下事件过程：
Privte Sub Form_Click0
Dim x As Integer,n As Integer
x=1
n=0
Do While x＜28
x=x*3
n=n+1
Loop
Print x,n
End Sub
程序运行后，单击窗体，输出结果是( )。
A. 81 4
B. 56 3
C. 28 1
D. 243 5
[单项选择]
设有如下窗体单击事件过程：
Private Sub Form _Click（ ）
a＝1
For i＝1 To 3
Select Case i
Case 1,3
a＝a+1
Case 2, 4
a＝a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后，单击窗体，则消息框的输出的结果是（）。
A. 3
B. 4
C. 5
D. 6
[单项选择]假定编写了如下4个窗体事件的事件过程，则运行应用程序并显示窗体后，已经执行的事件过程是（）。
A. Load
B. Click
C. LostFocus
D. KeyPress
[单项选择]假定有如下的命令按钮(名称为Commandl)事件过程：
Private Sub Commandl_Click（ ）
x=InputBox("输入:","输入整数")
MsgBox"输入的数据是广"，"输入数据:"+x
End Sub
程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是( )。
A. x的值是数值10
B. 输入对话框的标题是“输入整数”
C. 信息框的标题是“输入数据：10”
D. 信息框中显示的是“输入的数据是：”
[单项选择]假定有如下的命令按钮(名称为Command1)事件过程：
Private Sub Command1_Click（ ）
x=InputBox("输入:", "输入整数")
MsgBox"输入的数据是:", ,"输入数据:"+x
End Sub
程序运行后，单击命令按钮，如果从键盘上输入整数10，则下列叙述中错误的是
A. x的值是数值10
B. 输入对话框的标题是"输入整数"
C. 信息框的标题是"输入数据:10"
D. 信息框中显示的是"输入的数据是:"
[单项选择]单击窗体上Commandl命令按钮时，执行如下事件过程：
Private Sub Commandl _ Click（ ）
a＄="software and hardware"
b＄=Right(a＄,8)
c＄=Mid(b＄,1,8)
Msgbox c＄
End sub
则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. and
[单项选择]设在窗体上有个文本框，然后编写如下的事件过程：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Const Alt=4
Const Key_F2=&H71
altdown%=(Shift And Alt)＞0
t2down%=(KeyCode:Key_F2)
If altdown% And f2down% Then
Text1.Text="BBBBB"
End If
End Sub
上述程序运行后，如果按Shift+F2键，则在文本框中显示的是( )。
A. Alt+F2
B. BBBBB
C. 随机出几个数
D. 文本框内容无变化
[单项选择]在窗体上面一个名称为TxtA的文本框，然后编写如下的事件过程：
Private Sub TxtA_KeyPress(KeyAscii as Integer)
…
End Sub
若焦点位于文本框中，则能够触发KeyPress事件的操作是______。
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
[单项选择]在窗体上面画一个名称为TxtA的文本框，然后编写如下的事件过程：
Private Sub TxtA__KeyPress(Keyascii as integer)
……
End Sub
若焦点位于文本框中，则能够触发KeyPress事件的操作是 ______。
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
