首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为List1的列表框。其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick( ) Exchange List1.List1.Listlndex End Sub
窗体上有1个名称为List1的列表框。其中有若干列表项,并有下面程序代码: Private Sub List1_DblClick( ) Exchange List1.List1.Listlndex End Sub
admin
2020-08-10
31
问题
窗体上有1个名称为List1的列表框。其中有若干列表项,并有下面程序代码:
Private Sub List1_DblClick( )
Exchange List1.List1.Listlndex
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.ListCount-1),k
Source.RemoveItem Source.ListCount-1
Source.AddItem ch
End Sub
程序运行后,双击某个列表项,产生的结果是( )。
选项
A、被双击的列表项与最后一个列表项互换位置
B、被双击的列表项被删除
C、被双击的列表项移到最前面
D、被双击的列表项移到最后面
答案
A
解析
在List1_DblClick过程中调用Exchange过程,并将控件对象List1作为参数传递给Exchange过程,在调用含有对象的过程时,对象是通过传地址的方式进行传递。在Exchange过程中执行如下操作步骤:
第一步:变量k保存List1列表框中已选中表项的位置
第二步:变量ch用来保存被选中列表项的内容
第三步:使用列表框的Removeltem方法将列表框中已选中列表项的内容移除
第四步:通过Addhem方法将列表框最后一项的内容放置于已选中表项的位置
第五步:将列表框的最后一项内容移除
第六步:将第二步中变量ch中保存的内容放置到列表框的最后一项
根据上述操作步骤可知,过程Exchange的功能是当双击列表框中的某一表项时,将该表项内容与最后一项内容进行交换,故A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/eqHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
在菜单编辑器中建立如下图所示的菜单,并为每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
窗体上:有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCortmaandlClick()m=InputBo
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
设窗体上无任何控件,且有如下程序代码:PrivateSubForm_KeyPress(KeyAsciiAsInteger)PrintChr(KeyAscii)EndSubPrivateSubForm_KeyDown(K
要使标签中的文本靠右显示,应将其Aligment属性设置为
产生100以内(不含100)2位随机整数的VisualBasic表达式是
在名称为Forml的窗体上画一个文本框,名称为Textl,其宽度为1000;再画一个滚动条,名称为HSl。其刻度值的范围是1000~2000。请编写滚动条的Change事件过程,程序运行后,如果移动滚动框,则可按照滚动条的刻度值改变文本框的宽度。运行时的窗
随机试题
某工业企业成立于2007年,至2011年的四年间各年获利情况如下:2007年亏损100万元,2008年亏损20万元,2009年获利40万元,2010年获利60万元。2011年实现销售收入1500万元,利润总额400万元。已预缴所得税90万元。经注册会计师审
throughknoweducatetakeholdwithofproportionatescholarclaiminternationalsp
使结合,(与……)结合vt.i________
陆游在《游山西村》一诗中流传最广,景物描写中寓含哲理,千百年来被人们广为传诵的句子是:_____________,_____________。
女性,25岁。两个月来稍有腹胀,便秘,乏力,食纳略减少,消瘦,检查右下腹可触及6cm×8cm肿块,质中,边缘不清,有压痛,结肠镜检查回盲部肠黏膜充血水肿,有大小不等的炎性息肉,病理检查为干酪样肉芽肿,最可能的诊断是
A.肝素B.华法林C.噻氯匹定D.尿激酶E.维生素K
(2017年第53题)汽车客运站的汽车进站口与学校主要出入口的距离不应小于()。
珍禽异兽
下列语句段落将输出字符’*’的个数为()。#include<iostream.h>Voidmain(){inti=100;while(1){i--;if(i==0)break;cout<<’*’;}}
Iftherearemuchmorepeopleintheworld,then76.______theremusthavemorefoodtofeedthepeople.Butfoodis77.
最新回复
(
0
)