单项选择题

在菜单编辑器中建立一个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=1 Then
PopupMenu Menu0
End If
End Sub
则以下叙述中错误的是

A．该过程的作用是弹出一个菜单
B．单击鼠标右键时弹出菜单
C．Menu0是在菜单编辑器中定义的弹出菜单的名称
D．参数X、Y指明鼠标当前位置的坐标
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： Private Sub Command1_Click() CD1.FileName= CD1.Filter= All Files|*.*|(*.Doc)|*.Doc|(*.Txt)|*.txt CD1.FilterIndex=2 CD1.Action=1 End Sub 关于以上代码，错误的叙述是
A．执行以上事件过程，通用对话框被设置为“打开”文件对话框
B．通用对话框的初始路径为当前路径
C．通用对话框的默认文件类型为*.Txt
D．以上代码不对文件执行读写操作
单项选择题
在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序： Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text= Text2.Text= End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) S2=S2 & Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1= S2= End Sub 程序运行时，在Text1中输入abc后单击命令按钮，在文本框Text1和Text2中显示的内容分别为
A．abc和ABC
B．abc和abc
C．ABC和abc
D．ABC和ABC
相关试题