首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名为Listl的列表框和一个名为Commandl的命令按钮,并有下面的事件过程: Private Sub Commandl_Click() n%=List 1.Listlndex Ifn>0 Then ch$=L
窗体上有一个名为Listl的列表框和一个名为Commandl的命令按钮,并有下面的事件过程: Private Sub Commandl_Click() n%=List 1.Listlndex Ifn>0 Then ch$=L
admin
2020-04-18
66
问题
窗体上有一个名为Listl的列表框和一个名为Commandl的命令按钮,并有下面的事件过程:
Private Sub Commandl_Click()
n%=List 1.Listlndex
Ifn>0 Then
ch$=Listl.List(n)
Listl.List(n)=Listl.List(n一1):Listl.List(n—1)=ch
End If
End Sub
程序运行时,选中1个列表项,然后单击Commandl按钮,则产生的结果是
选项
A、若选中的不是最前面的列表项,则选中的列表项与它前一个列表项互换位置
B、选中的列表项与它前面的列表项互换位置
C、若选中的不是最后面的列表项,则选中的列表项与它后一个列表项互换位置
D、选中的列表项与它后面的列表项互换位置
答案
A
解析
List属性是一个数组,存放列表框中所有项目的内容;ListIndex属性可返回当前所选项目的索引号,第一个项目的索引号为0。List1.List(n-1)指的是当前选中列表项的前一个列表项。
转载请注明原文地址:https://kaotiyun.com/show/PrTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=“”strL=Len(xStr)
某人编写了下面的程序,希望能把Textl文本框中的内容写到Temp.txt文件中PrivateSubCommandlClick()Open“Temp.txt”ForOutputAs#2Print“11ext1”
有如下过程代码:Subvar_dim()StalicnumaAsIntegerDimnumbAsIntegernuma=numa+2numb=n
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出最大值”,如图所示),即
若看到程序中有以下事件过程,则可以肯定的是,当程序运行时( )。PrivateSubClick_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Print
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypex aAsInteger bAsIntegerEndTypePrivateSubCommand1_Cli
使用()方法,可清除列表框中所有的列表项。
下面不能作为结构化方法软件需求分析工具的是
表达式5*Sqr(25)+Sgn(4^4)的值是
下面属于系统软件的是
随机试题
肾炎出现蛋白尿的原因是()
男性,35岁,尿潴留,遵医嘱行留置导尿。插尿管时,提起阴茎与腹壁呈60°,可使
X线摄影中,散射线由
一青年近3日咳嗽,高热39℃,铁锈色痰,WBC18.5×109/L,X线胸片发现右肺中叶有大片阴影,临床诊断为大叶性肺炎,致病菌为()
[2006年第021题,2004年第027题,1997年第116题]关于12层及12层以上的高层住宅楼设置电梯的规定,下列哪条为正确?
2015年8月1日,甲公司因产品质量不合格而被乙公司起诉。至2015年12月31日,该起诉讼尚未判决,甲公司估计很可能承担赔偿责任,需要赔偿200万元的可能性为70%,需要赔偿100万元的可能性为30%。甲公司基本确定能够从直接责任人处追回50万元。201
按照《工伤保险条例》的规定,职工(),应视同工伤。
A、 B、 C、 D、 C
KB(千字节)是度量存储器容量大小的常用单位之一,1KB等于()。
Hollywood’strueheroesarelosingtheirjobs.Stuntpeople(替身演员)whoentertainedcinema-goersbyfallingforthesky,swimming
最新回复
(
0
)