首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
按照下表建立菜单: 单击菜单的事件过程如下: Private Sub mnu1_Click(Index As Integer) Select Case Index Case1 Print"选中菜单项1" C
按照下表建立菜单: 单击菜单的事件过程如下: Private Sub mnu1_Click(Index As Integer) Select Case Index Case1 Print"选中菜单项1" C
admin
2019-08-22
55
问题
按照下表建立菜单:
单击菜单的事件过程如下:
Private Sub mnu1_Click(Index As Integer)
Select Case Index
Case1
Print"选中菜单项1"
Case2
If mnu1(2).Checked=True Then
mnul(2).Checked=False
Else
mnu1(2).Checked=True
Else If
Case3
Print”选中菜单项3”
End Select
End sub
关于上述程序,以下叙述中错误的是( )。
选项
A、各子菜单项组成一个名称为mnu1的控件数组
B、不论选中菜单项1、2或3,均执行mnul_Click事件过程
C、Case 2分支的语句没有必要,因为该菜单项的“复选”属性已被设置
D、程序中的Index是系统自动产生的
答案
C
解析
菜单项l至菜单项3是名称为mnu1的控件数组,系统自动产生索引分别为1,2,3。由于是控件数组,选中菜单项1至3中任何一项,都会执行mnul_Click事件过程。选C。
转载请注明原文地址:https://www.kaotiyun.com/show/jsTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是()。
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerX=n*nFun=x一11EndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如
阅读程序:PrivateSubForm_Click()x=50Fori=1To4y=InputBox("请输入一个整数")y=Val(Y)IfyMod5=0Thena=
下列控件中,没有Caption属性的是()。
以下关于控件数组的叙述中,正确的是()。
下列关于二叉树的叙述中,正确的是()。
阅读程序:PrivateSubForm_Click()a=0Forj=1To15a=a+jMod3NextiPrintaEndSub程序运行后,单击窗体,输
有以下程序代码:ConstNUMAsInteger=5PrivateSubFormClick()DimaAsInteger,bAsIntegera=1:b=NUMDoa=a+
用来设置文字字体是否为粗体的属性是()。
以下叙述中错误的是()。
随机试题
Internet的接入控制主要对付三类入侵者,他们是地下用户、________和________。
投资目标的分解类型有( )。
按照金融工具发行和流通特征分类,金融市场可以划分为()。
长江海事作为长江干线的重要执法力量,在新形势新要求下,必须______地走“生态优先、绿色发展”之路,必须______地与破坏长江生态环境保护的违法行为作斗争,做美丽长江的捍卫者、平安长江的保护者、高质量发展的践行者。依次填入划横线处最恰当的一组的是:(
有一种长着红色叶子的草,学名叫abana,在地球上极稀少。北美的人都认识一种红色叶子的草,这种草在那里很常见。从上面的事实不能得出以下哪项结论?
A、 B、 C、 D、 D
Thisstorybeganabout10yearsago.Iwascomingoutofaverybadmarriage.Forsevenlongyearsmyhusbandspenthiseverywa
The(oldest)publicedificeinWashingtonD.C.,theWhiteHousewas(originally)constructedinthe1790’s,(also)hasbeenrebu
A.indicativeB.reachC.immediateD.lackE.content-freeF.trackingG.specifying
ThebirthoftheSpaceTransportationSystem(STS)andtheneweraofspaceactivitiesitwillbringarecontributingtoarecen
最新回复
(
0
)