单项选择题

对窗体编写如下事件过程：
Private Sub Form_ Mouse Down(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
BBBBB
B．BBBBB
AAAAA
C．AAAAA
D．BBBBB

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个命令按钮和一个通用对话框，其名称分别为Command1和CommonDialogl，然后编写如下代码； Private SubCommand1_Click() CommonDialogl.Filter= All Files |*.*|(*.exe)|*.exe|(*.doc) [*.doc|(*.bmp)|*.bmp CommonDialogl.FileName= CommonDialogl.Flags=vbOFNFileMustExist CommonDialogl.FilterIndex=3 CommonDialogl.DialogTitle= OpenFile(*.doc) CommonDialogl.Action=1 If CommonDialogl.FileName= Then MsgBox No file selected ，37， Checking Else End If End Sub 程序运行后，单击命令按钮，将显示一个对话框，该对话框的标题是 ______。

A．空字符
B．OpenFile(*.doc)
C．打开文件
D．保存文件

单项选择题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private SubCommand1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2，4，6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的 ______。

A．10
B．20
C．30
D．40

相关试题