首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程: Private Sub Command1_Click() For i=0 To
窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程: Private Sub Command1_Click() For i=0 To
admin
2020-02-27
28
问题
窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:
Private Sub Command1_Click()
For i=0 To List1.ListCount-1
If List1.Selected(i)=True Then
List2.AddItem Text
End If
Next
End Sub
上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是( )。
选项
A、将For循环的终值改为List1.ListCount
B、将List1.Selected(i)=True 改为List1.List(i).Selected=True
C、将List2.AddItem Text 改为List2.AddItem List1.List(i)
D、将List2.AddItem Text 改为List2.AddItem List1.ListIndex
答案
C
解析
题目程序不能将List1中的选中项添加到List2中,List2.AddItem Text一行有误,应该改为List2.AddItem List1.List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组,可以通过下标访问数组中的值。
转载请注明原文地址:https://kaotiyun.com/show/9tTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSubForm_Load()D
窗体上有一个如右图所示的图形控件,控件中显示了如图所示的文字,可以判断这个图形控件()。
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)EndSub其中参数KeyCode的值表示的是发生此事件时()。
定义部门关系模式如下:部门(部门号,部门名,部门成员,部门总经理),使它不满足第一范式的属性是()。
下列序列中不满足堆条件的是()。
以下关于VB的叙述中,错误的是()。
在标准模块中,将a定义为全局整型变量的语句是()。
表达式Chr(Asc("G")+3)的值是()。
以下关于VB对象属性的叙述中,错误的是
随机试题
在x=2处,函数f(x)=幂级数展开式为__________.
设区域D={(x,y)|x2+y2≤4},则=________。
慢性肺源性心脏病患者胸部X线片典型心脏特征是
A.EB病毒B.人乳头瘤病毒C.乙肝病毒D.幽门螺旋杆菌E.丙肝病毒与鼻咽癌相关的是
小儿易发生间质性肺炎的原因是
肥达反应属于
【2015年福建.单选】“苦其心志,劳其筋骨,饿其体肤,空乏其身”体现的教育方法是()。
某团体有100名会员,男、女会员人数比为14:11,会员分为三组,甲组人数与乙、丙两组人数总和一样多,甲、乙、丙各组男女会员的人数比分别是甲为12:13,乙为5:3,丙为2:1。求丙组中有男会员多少人?()
A.littleB.unansweredC.detectD.inevitablyE.deepF.dropG.uselessH.
A、Obediencetrainingwouldteachthedogtoperformclevertricks.B、Obediencetrainingwouldbethefoundationforsolvingany
最新回复
(
0
)