首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick() Exchange List1.List1.ListIndex End Sub Privat
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick() Exchange List1.List1.ListIndex End Sub Privat
admin
2020-07-22
36
问题
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码:
Private Sub List1_DblClick()
Exchange List1.List1.ListIndex
End Sub
Private Sub Exchange(Source As ListBox,k As Integer)
k%=Source.ListIndex
ch=Source.List(k)
Source.Removehem k
Source.AddItem Source.List(Source.ListCount一1),k
Source.RemoveItem Source.ListCount一1
Source.Addltem eh
End Sub
程序运行后,双击某个列表项,产生的结果是( )。
选项
A、被双击的列表项与最后一个列表项互换位置
B、被双击的列表项被删除
C、被双击的列表项移到最前面
D、被双击的列表项移到最后面
答案
A
解析
在List_DblClick过程中调用Exchange过程,并将控件对象List1作为参数传递给Exchange过程,在调用含有对象的过程时,对象是通过传地址的方式进行传递。在Exchange过程中执行如下操作步骤:
第一步:变量k保存List1列表框中已选中表项的位置
第二步:变量ch用来保存被选中列表项的内容
第三步:使用列表框的Removehem方法将列表框中已选中列表项的内容移除
第四步:通过Addltem方法将列表框最后一项的内容放置于已选中表项的位置
第五步:将列表框的最后一项内容移除
第六步:将第二步中变量ch中保存的内容放置到列表框的最后一项
根据上述操作步骤可知,过程Exchange的功能是当双击列表框中的某一表项时,将该表项内容与最后一项内容进行交换,故A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/GAHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中正确的是( )。
在窗体上画一个名称为Combol的组合框,名称为Textt的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的
为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为( )。
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是( )。
以下叙述中错误的是()。
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
下列数组定义语句中错误的是
下面不属于软件设计阶段任务的是
以下关于图片框控件的说法中,错误的是( )。
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是()。
随机试题
王丹可以向哪个法院起诉?为什么?判决之后,明富、明贵、王小兰在3个月内均未向王丹支付赡养费,王丹于是向法院提出了强制执行申请。法院正在积极进行执行工作,然而5天后的一个晚上,王丹想喝水从床上拿放在桌上的暖瓶时一头栽到地上,导致脑出血死亡。请问法院如何
正确定性统计违法案件的基础是()。[2013年初级真题]
主权债务危机产生的负面影响包括()。Ⅰ.导致新的贸易保护Ⅱ.危机国财政紧缩、税收增加Ⅲ.危机国货币贬值Ⅳ.危机国国债收益率上升
下列原始凭证中,属于企业自制原始凭证的是()。
在面试中,考官提问“如果公司派你出差,而这时你妻子病危,你怎么处理?”此类面试属于()
请阅读下列材料,并按要求作答。草虫的村落今天,我又躺在田野里,在无限的静谧中,忘了世界,也忘了自己。我目光追随着爬行的小虫,作了一次奇异的游历。
一袋10磅的新鲜土豆一般值2美元,而脱水的速食土豆平均每磅值3美元。可以得出结论,一些消费者为了方便愿意支付15倍的价格,因为这种方便食品的销量在持续增加。下面哪项,如果正确,指出了上面的论证有较大的缺陷?
使用______按钮可以实现对数据访问页的记录的浏览功能。
HowmuchdoesoneT-shirtcost?
German’sEducationSystem[A]Germanyinventedthemodernuniversitybutlongagolostitsleadingpositiontoothercountries,e
最新回复
(
0
)