已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为a1，且取消其“可见”属性，如图2所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。

admin2020-02-27 53

问题已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为a1，且取消其“可见”属性，如图2所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。

选项 A、Private Sub Form MouseDown(Button As Integer,
ShiftAs Integer,XAs Single，YAs Single)
IfButton=2 Then PopupMenu a1．2
End Sub
B、Private Sub Form MouseDown(ButtonAs Integer,
ShiftAs Integer,X As Single，YAs Single)
PopupMcnu al，0
End Sub
C、Private Sub Form MouseDown(ButtonAs Integer,
Shiff As Integer,X As Single，YAs Single)
PopupMenu al
End Sub
D、Private Sub Form_MouseDown(ButtonAS Integer,ShiflAs_
Integer,XAs Single，YAs Singlel)
If(Button=vbLeffButton)0r(Button=vbRightButton)1hen PopupMenu a1
End Sub

答案A

解析本题考查弹出菜单的显示。PopupMenu为弹出菜单方法，使用格式为：[对象.]PoupMenu；菜单名,标志，x,y;其中，标志表示弹出的位置和触发的键，取值为0表示弹出菜单的左端在x处且识别左键单击，取值为04表示位于x的中心，取值为08表示在x的右边，一般判断是否单击右键，可通过判断Button是否为2来实现。

转载请注明原文地址:https://kaotiyun.com/show/TNTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为a1，且取消其“可见”属性，如图2所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。

二级VB

NCRE全国计算机二级

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click()　　d＝0　　c＝10　　x＝Array(10，12，21，32，24)　　Fori＝

下列程序的执行结果为()。A=“5”：B=“6”A=Val(A)+Val(B)B=Val(“56”)IfA＜＞BThenPrintA-BElsePrintB-A

窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下：PrivateSubCommand1_Click(IndexAsInteger)　　IfIndex＝1Then　　　　Print"计算机等级考试"　　En

VB中有这样一类文件：该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是(　　)。

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()　　m＝－3.6　　IfSgn(m)Then　　　　n＝Int(m)　　Else　　　　n＝Abs(m)　　EndIf

一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈，然后再依次出栈，则元素出栈的顺序是

若看到程序中有以下事件过程，则可以肯定的是，当程序运行时(　　)。PrivateSubClick_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Print

有人在属性窗口中通过设置Picture属性为命令按钮装入了图片，但没有显示，其原因是

在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是()。

剖腹产常用的切口部位()

男，28岁。少尿、水肿、呕吐一个月余，7岁时曾发现尿蛋白阳性，血压180／120mmHg，尿蛋白(+++)，红细胞5—10个／HP，白细胞3～5个／HP，BUN30mmol／L，血肌酐860～mmol／L，血红蛋白65g/L。初步诊断为

女性，42岁，既往健康，近2个月出现巩膜、皮肤黄染，呈进行性加重，无腹痛，略消瘦，体检见肝肋下可触及，右上腹扪及肿大之胆囊，无触痛，无发热。如黄疸性质为梗阻性，欲明确梗阻部位，选择下列哪项检查手段为最优

项目实施后的实际结果可能与基本方案产生偏差,主要原因是()。

【2008年真题】关于投资方案经济效果评价指标的说法中，正确的有()。

“利润分配”科目下设置的“提取任意盈余公积”属于()。

关于法律解释的方法和种类，下列表述正确的有()。

Stocksfinishedmixedinpost-holidaytradingyesterdayasWallStreetmeanderedthroughashortenedsession.(46)Themajorinde

JohnWaltersisthedirectoroftheUSOfficeofNationalDrugControlPolicy.HethinksthatmanyEuropeangovernmentsaretoo

已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为a1，且取消其“可见”属性，如图2所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。

二级VB

NCRE全国计算机二级

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click() d＝0 c＝10 x＝Array(10，12，21，32，24) Fori＝

下列程序的执行结果为()。A=“5”：B=“6”A=Val(A)+Val(B)B=Val(“56”)IfA＜＞BThenPrintA-BElsePrintB-A

窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下：PrivateSubCommand1_Click(IndexAsInteger) IfIndex＝1Then Print"计算机等级考试" En

VB中有这样一类文件：该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是( )。

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click() m＝－3.6 IfSgn(m)Then n＝Int(m) Else n＝Abs(m) EndIf

一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈，然后再依次出栈，则元素出栈的顺序是

若看到程序中有以下事件过程，则可以肯定的是，当程序运行时( )。PrivateSubClick_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Print

有人在属性窗口中通过设置Picture属性为命令按钮装入了图片，但没有显示，其原因是

在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是()。

剖腹产常用的切口部位()

男，28岁。少尿、水肿、呕吐一个月余，7岁时曾发现尿蛋白阳性，血压180／120mmHg，尿蛋白(+++)，红细胞5—10个／HP，白细胞3～5个／HP，BUN30mmol／L，血肌酐860～mmol／L，血红蛋白65g/L。初步诊断为

女性，42岁，既往健康，近2个月出现巩膜、皮肤黄染，呈进行性加重，无腹痛，略消瘦，体检见肝肋下可触及，右上腹扪及肿大之胆囊，无触痛，无发热。如黄疸性质为梗阻性，欲明确梗阻部位，选择下列哪项检查手段为最优

项目实施后的实际结果可能与基本方案产生偏差,主要原因是()。

【2008年真题】关于投资方案经济效果评价指标的说法中，正确的有()。

“利润分配”科目下设置的“提取任意盈余公积”属于()。

关于法律解释的方法和种类，下列表述正确的有()。

Stocksfinishedmixedinpost-holidaytradingyesterdayasWallStreetmeanderedthroughashortenedsession.(46)Themajorinde

JohnWaltersisthedirectoroftheUSOfficeofNationalDrugControlPolicy.HethinksthatmanyEuropeangovernmentsaretoo

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click()　　d＝0　　c＝10　　x＝Array(10，12，21，32，24)　　Fori＝

窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下：PrivateSubCommand1_Click(IndexAsInteger)　　IfIndex＝1Then　　　　Print"计算机等级考试"　　En

VB中有这样一类文件：该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是(　　)。

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()　　m＝－3.6　　IfSgn(m)Then　　　　n＝Int(m)　　Else　　　　n＝Abs(m)　　EndIf　

若看到程序中有以下事件过程，则可以肯定的是，当程序运行时(　　)。PrivateSubClick_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Print