首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是
设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是
admin
2009-01-15
58
问题
设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单相应鼠标右键菜单的是
选项
A、Private Sub Form_MouseDown(Button As Integer, Shift As Integer,_ X As Single, Y As Single) If Button=2 Then PopupMenu Bt, 2 End Sub
B、Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt End Suh
C、Private Sub Form MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PopupMenu Bt,0 End Sub
D、Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If (Button=vbLeftButton) Or ( Button=vbRightButton) Then PopupMenu Bt End Sub
答案
1
解析
在Visual Basic中,允许出现快捷菜单,对用户来说,提供了很大的方便,一般来说,菜单都在窗口的顶部,有时,用户需要执行菜单中的某一命令,就得把鼠标移动到窗口顶部,然后打开菜单选择命令,这对用户来说,会觉得麻烦。而快捷菜单并不需要到窗口的顶部来打开,只要单击鼠标右键,就会弹出菜单。设计快捷菜单仍然可以用Visual Basic中提供的菜单编辑器,只要把某个菜单设置成隐藏就可以了,实际上,不管是在窗口顶部菜单条上显示的菜单还是隐藏的菜单,都可以用PopupMenu方法把它们作为快捷菜单在运行时显示出来。PopupMenu方法的使用形式如下: [对象].PopupMenu菜单名,标志,x,y
其中,x,y是提供菜单显示的位置;标志:指定快捷菜单的行为。当标志为0时,快捷菜单中的项只能对鼠标左键起反应;当标志为2时,快捷菜单中的项对鼠标右键和左键都反应;标志为2时,PopupMenu方法只能用在MouseDown事件过程中。
转载请注明原文地址:https://www.kaotiyun.com/show/Xe2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
定义初值为10的10次方的长整型变量var的语句是_____________。
如果在Applet中要访问一个HTML文件,可以请求浏览器实现相应HTML文本的显示。通过AppletContext的【】方法,Applet可以通知浏览器在哪个窗口中显示哪个URL中的文件。
下列命令中,哪个命令是Java的API文档生成器?
程序设计基本结构有顺序结构、选择结构和______共3种。
在面向对象方法中,类之间共享属性和操作的机制称为______。
通常把用户的要求转变成______的过程叫做软件开发过程。
下列对继承的说法,正确的是()。
数据库的三级模式结构由外模式、模式和内模式组成,它适合于哪个(些)类型的数据库()。 Ⅰ.关系型数据库 Ⅱ.层次型数据库 Ⅲ.网状型数据库
线程控制方法中,yield()的作用是()。
随机试题
商业银行
ThereasonIdidnotgotoFrancewas______anewjob.
患者,男,76岁。午后潮热,身热不扬,胸脘痞闷,则其舌象表现为
T3、T4过多综合征的症状不包括
在借贷记账法下,贷方表示负债、所有者权益增加,以及资产、费用的减少。( )
2014年初,甲公司经营陷入困境。面对困境,甲公司采取了以下措施:高管减薪,加强广告宣传,委托其他公司生产本公司的产品。这些措施所体现的收缩战略的方式有()。(2014年)
我国宪法的修改由全国人大()。
请阐述加因素法的原理,并举例说明。
关系模型中的术语“属性”对应的是Access数据库中的是()。
Wheredoestheconversationprobablytakeplace?
最新回复
(
0
)