首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick() Exchange List1,List 1.ListIndex End Sub Priva
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick() Exchange List1,List 1.ListIndex End Sub Priva
admin
2020-07-22
67
问题
窗体上有1个名称为List1的列表框,其中有若干列表项,并有下面程序代码:
Private Sub List1_DblClick()
Exchange List1,List 1.ListIndex
End Sub
Private Sub Exchange(Source As ListBox,k As Integer)
k%=Source.ListIndex
ch=Source.List(k)
Source.RemoveItem k
Source.AddItem Source.List(Source.List Count-1),k
Source.RemoveItem Source.ListCount-1
Source.Addhem ch
End Sub
程序运行后,双击某个列表项,产生的结果是( )。
选项
A、被双击的列表项与最后一个列表项互换位置
B、被双击的列表项被删除
C、被双击的列表项移到最前面
D、被双击的列表项移到最后面
答案
A
解析
在List1_DblClick过程中调用Exchange过程,并将控件对象List1作为参数传递给Exchange过程,在调用含有对象的过程时,对象是通过传地址的方式进行传递。在Exchange过程中执行如下操作步骤:
第一步:变量k保存List1列表框中已选中表项的位置
第二步:变量ch用来保存被选中列表项的内容
第三步:使用列表框的RemoveItem方法将列表框中已选中列表项的内容移除
第四步:通过AddItem方法将列表框最后一项的内容放置于已选中表项的位置
第五步:将列表框的最后一项内容移除
第六步:将第二步中变量ch中保存的内容放置到列表框的最后一项
根据上述操作步骤可知,过程Exchange的功能是当双击列表框中的某一表项时,将该表项内容与最后一项内容进行交换,故A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/oRHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1Fori=4T01Step-1S=S
设窗体上有一个标签Labell和一个计时器Timerl,Timerl的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程:PrivateSubCommandl_Click()n=0Fori=0To10X=2*i一1IfXMod3=0Thenn=n+1NextiPrint
以下关于控件的叙述中,正确的是
下面程序运行时,若输入395,则输出结果是PrivateSubCommand1_Click()Dimx%x=InputBox("请输入一个3位整数")PrintxMod10,x\100,(xMod100)\10EndSu
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
随机试题
某28岁女性患者怀孕50天,确诊为肺结核,下列哪种药物不能使用
中滑板丝杠与螺母间的间隙应调到使中滑板手柄正、反转之间的空程量在()转以内。
A.肛门反射消失B.足跖屈力减弱C.躅背伸肌力减弱D.踝反射减弱或消退E.外踝附近及足外侧痛、触觉减退马尾神经受压时可能出现
阿托品用于全身麻醉前给药其目的是
某商业零售企业为增值税小规模纳税人,2009年9月购进货物(商品)取得普通发票,共计支付金额120000元;经主管税务机关核准购进税控收款机一台取得普通发票,支付金额5850元;本月销售货物取得零售收入共计158080元。该企业本月应缴纳的增值税为()
A公司因不能清偿到期债务,且明显缺乏清偿能力,主动向人民法院申请破产。2016年4月1日,人民法院裁定受理A公司破产申请,并指定某会计师事务所为管理人。管理人在清理公司资产过程中发现,A公司的股东甲于2014年3月认缴增资200万元,根据公司章程规定,甲
对于任性的学生应着重培养其意志品质的()。
天河路商罔历来是流浪歌手分布最为密集的一带,每当傍晚6点半左右,从岗顶行至广州购书中心,路边将近20处街头艺人在纵情高歌,吸引不少路人驻足。“如果在广州也实行执证上岗的话,对于我们这些街头表演者来说肯定影响不小”,将街边艺术当做主职的顾先生当被问
在SQLServer2008中,设有职工表(职工号,姓名,所在部门,工资),现要建立查询指定门的最高工资的标量函数。下列语句中正确的是()。
阅读下面的对话,根据其内容写一篇有关一起交通事故的记叙文。要求:1.所写短文应与对话相关内容意义相符,涵盖其要点。2.用你自己的语言来表达,可以改写对话中的句子,但不可以照抄原句。注意:词数80词左右。Mark:Anythinginteres
最新回复
(
0
)