首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Text1上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是( )。
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Text1上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是( )。
admin
2020-06-30
87
问题
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Text1上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是( )。
选项
A、Private Sub Text1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=2 Then
PopupMenu mnuStyle
End If
End Sub
B、Private Sub Text1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=1 Then
PopupMenu mnuStyle
End If
End Sub
C、Private Sub Text1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=2 Then
mnuStyle.Show
End If
End Sub
D、Private Sub Text1_MouseDown(Button.As Integer,Shift As Integer,X As Single,Y As Single)
If Button=1 Then
mnuStyle.Popup
End If
End Sub
答案
A
解析
为了显示弹出式菜单,通常把PopupMenu方法放在MouseDown事件中,该事件响应所有的鼠标单击操作。按照惯例,一般通过单击鼠标右键显示弹出式菜单,这可以用Button参数来实现。对于鼠标来说,左键的Button参数值为1,右键的Button参数设置为2,因此,可以使用“If Button=2 Then PopupMenu菜单名”语句可以通过单击鼠标右键来响应MouseDown事件、显示弹出式菜单,故本题A选项正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/q1Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,其名称为CommonDialog1,则下列与CommonDialog1.ShowOpen方法等效的语句是( )。
下列叙述中正确的是( )。
在设计阶段,如果双击窗体上的一个文本框控件,则在代码窗口中显示该控件的事件过程所对应的事件是
程序运行时,当在空文本框中依次输入1234时,窗体上显示的是()。PrivatesubText1Change()PrintText1:EndSub
以下关于图片框控件的说法中,错误的是( )。
关于菜单设计,下列叙述中错误的是()。
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。窗体文件的程序如下:PrivateTypeXaAsIntegerbAsIntegerEndTypePrivateSubCom
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下:PublicxAsIntegerPrivateSubFo
下列说法中,错误的是
随机试题
下列关于施工便道设置的说法,错误的是()。
与腰阳关穴在同一水平线上的腧穴是
20世纪60年代,市场营销教授麦卡锡提出的著名的4P组合理论,即()。
钢筋混凝土管桩适用于入土深度不大于25m,下沉所用振动力不大的条件,其()。
在一定条件下,水路运输费用只相当于公路运费的()。
材料:情境一:一天晚上,莉莉和妈妈散步时,有下列对话:妈妈:月亮是在动还是不动?莉莉:我们动它就动。妈妈:是什么使它动起来的呢?莉莉:是我们。妈妈:我们怎么使它动起来的呢?莉莉:我们走路的时候它自己就走了。情境二:在幼儿园数学区活动中,
现代企业组织制度的主要内容有()。
AsItypetheselines,mydaughter,Harriet,whois14,isonheriPhoneskippingamongnofewerthaneightsocialmediasites.
Whentwodrunkenmenfightoverawoman,alcoholandstupiditymaynotbetheonlythingsatwork.Sadly,evolutionmayhavesha
うちの会社には英語が話せない人は一人もいない。
最新回复
(
0
)