首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程: Private Sub Command1_Click() n%=List1.ListIndex If n>0 Then ch$=List1.Lis
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程: Private Sub Command1_Click() n%=List1.ListIndex If n>0 Then ch$=List1.Lis
admin
2015-06-30
59
问题
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:
Private Sub Command1_Click()
n%=List1.ListIndex
If n>0 Then
ch$=List1.List(n)
List1.List(n)=List1.List(n-1)
List1.List(n-1)=ch
End If
End Sub
程序运行时,选中1个列表项,然后单击Command1按钮,则产生的结果是( )。
选项
A、若选中的不是最前面的列表项,则选中的列表项与它前一个列表项互换位置
B、选中的列表项与它前面的列表项互换位置
C、若选中的不是最后面的列表项,则选中的列表项与它后一个列表项互换位置
D、选中的列表项与它后面的列表项互换位置
答案
A
解析
当单击Command1按钮后,List1列表框中被选中项的索引值赋给变量n,如果被选中项不是空也不是第1项时,将选中项的项目文字赋值给变量ch,用选中项的上面一项的文字替换选中项的文字,再把变量ch中的文字替换选中项上面一项的文字,简单说就是选中项和它上面一项的文字交换。因此A选项的说法正确。
转载请注明原文地址:https://www.kaotiyun.com/show/IfQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果是______。a=0b=0Fori=-1To-2Step-1Forj=1To2b=b+1Nextja=a+1
下列程序的输入值分别为100,10则执行结果为非作歹______。m=Val(inputbox(“请输入数学1”))n=Val(inputbox(“请输入数学2”))Ifn*m=0ThenMsgBo
下列程序段的执行结果为______。DimA(10,10)ForI=2To4ForJ=4To5A(I,J)=I*JNextJNextIPrint
一个工程中包含两个名称分别为Form1和Form2的窗体,程序运行后,如果单击Form1,则隐藏Form1且显示Form2。下列可以执行上述操作的事件过程是
运行程序段后输出______个“*”号。Fori=1To2Forj=0Toi-1Print"*"NextjNexti
下列说法中正确的是为了保存一个VisualBasic应用程序,应当
以下不具有Picture属性的对象是
下述关于数据库系统的叙述中正确的是______。
以下叙述中正确的是______。
Jackson结构化程序设计方法是英国的M.Jackson提出的,它是一种面向【】的设计方法;
随机试题
女性,28岁,妊娠8个月,转移性右下腹痛10小时,伴恶心、呕吐。查体:体温39.℃,右肋下外有压痛,无腹肌紧张和反跳痛。血常规:白细胞10.×109/乙中性粒细胞78%。如果病人病情进一步加重,应该考虑( )。
自愿无偿献血是指下列哪种做法
制备下列溶液时,应用加热溶解法可加速溶解的是
下面关于消化性溃疡治疗药硫糖铝叙述错误的是
背景资料:某建筑工程,建筑面积3.8万m2,地下1层,地上16层。施工单位(以下简称“乙方”)与建设单位(以下简称“甲方”)签订了施工总承包合同,合同期600d。合同约定工期每提前(或拖后)1d奖励(或罚款)1万元。乙方将屋面和设备安装两项工程的劳务进行
建设工程项目进度计划系统是由多个相互关联的进度计划组成的系统,它在()。
一个完善的市场体系能够较为真实地反映出市场中商品的要素的市场价值,这样体现出具有()功能。
设二叉树如下:则后序序列为
"Heavens!"exclaimedtheauntofClovis,"here’ssomeoneIknowbearingdownonus.Ican’trememberhisname,butbelunchedwi
Anewstudyofthebrainishelpingscientistsbetterunderstandhowhumansprocesslanguage.Oneofthepatientsisawomanwit
最新回复
(
0
)