窗体上有List1、List2两个列表框,List1中有若干列表项(见图),并有下面的程序:Private Sub Command1_Click( )For k=List1.ListCout-1 To 0 Ste

题目

窗体上有List1、List2两个列表框,List1中有若干列表项(见图),并有下面的程序:

Private Sub Command1_Click( )

For k=List1.ListCout-1 To 0 Step-1

If List1.Selected(k)Then

List2.Addltem List1.List(k)

List1.Removeltem k

End If

Next k

End Sub

程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是( )。

A.在List2中插入了“外语”、“物理”两项

B.在List1中删除了“外语”、“物理”两项

C.同时产生A和B的结果

D.把List1巾最后1个列表项删除并插入到List2中

如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

设窗体上有—列表框控件List1,且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是

A.List1.List

B.List1.List1ndex

C.List1.Index

D.List1.Text


正确答案:D
解析:其中List用来列出列表框中表项的内容,可与“(下标)”组合使用;List1ndex表示已选中表项的位置;Index仅仅对于控件数组有用,对于单个控件没有意义;Text属性返回最后一次选中的表项的文本,它不能直接在设计阶段修改。

第2题:

设窗体上有一个列表框控件List1,且其中含有若干列表项,则以下能表示当前被选中的列表项内容的是 ______。

A.List1.List

B.List1.ListIndex

C.List1.Index

D.List1.Text


正确答案:D
解析:列表框的List属性表示列表框的内容,为数组,下标为o~n-1,n表示列表框的项数。ListIndex属性表示选中的列表框项目的位置,第一项从。开始。Text属性才是表示指定当前选中的列表框项目的文本内容。

第3题:

(8)在程序的空白处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除 Do While List2.ListCount _____________________ List2.RemoveItem 0 Loop


正确答案:List1.AddItem List2.List(0)
【解析】AddItem方法的一般格式为:object.AddItem Item,Index其中,“Item”用来指定添加到该对象的项目;“Index”用来指定新项目或行在该对象中的位置,第一项为0。如果所给出的Index值有效,则Item将放置在object中相应的位置。如果省略Index,当Sorted属性设置为True时,Item将添加到恰当的排序位置;当Sorted属性设置为False时,Item将添加到列表的结尾。
  分析程序可知,程序是要通过循环来将List2中的项逐个添加到List1中,但因为是给List1添加一项,同时删除List2一项,因此添加项的索引号(ListIndex)始终是第1项0,因此添加项的语句是“List1.AddItem List2.List(0)”。
注意:①当列表框中的列表项被删除一项时,剩余的列表项会从0开始重新排序:②在本题中省略Index,则每次都自动添加到列表框尾部。

第4题:

给程序的空白行选择适当的语句。程序段的功能是:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除。( ) Do While List2.List Count ______ List2.Removeltem0 Loop

A.List1.AddltemList2.List(0)

B.List1.Addltem List2.Text

C.List2.AddltemList1.List(0)

D.List2.AddltemList1.Text


正确答案:A

第5题:

设窗体上有一个列表框控件List1,且其中含有若干列表项。则以下能够表示当前被选中的列表项内容的是______。

A.List1. List

B.List1. ListIndex

C.List1. Index

D.List1. Text


正确答案:D
解析:获取当前选定项目值的最简单方法是使用Text属性。Text属性总是对应用户在运行时选定的列表项目。

第6题:

设窗体上有一个列表框控件List1,且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是

A.List1.List

B.List1.ListIndex

C.List1.Index

D.List1.Text


正确答案:D
解析:本题考查了列表框的几个比较容易混淆的属性。其中List用来列出列表框中表项的内容,可与“(下标)”组合使用;ListIndex表示已选中表项的位置;Index仅仅对于控件数组有用,对于单个控件没有意义;Text属性返回最后一次选中的表项的文本,它不能直接在设计阶段修改。故本题的正确答案为D。

第7题:

( 31 ) 窗体上有 List1 、 List2 两个列表框 , List1 中有若干列表项 ( 见图 ) , 并有下面的程

序:

Private Sub Comand1_Click ()

For k=List1.ListCount-1 To 0 Step -1

If List1.Selected ( k ) Then

List2.AddItem List1.List ( k )

List1.RemoveItem k

End If

Next k

End Sub

程序运行时,按照图示在 List1 中选中 2 个列表项,然后单击 Commandl 命令按钮,则产生的结果是

A )在 List2 中插入了 “ 外语 ” 、 “ 物理 ” 两项

B )在 List1 中删除了 “ 外语 ” 、 “ 物理 ” 两项

C )同时产生 A )和 B )的结果

D )把 List1 中最后 1 个列表项删除并插入到 List2 中


正确答案:C

第8题:

窗体卜有Listl、List2两个列表框,Listl中有若干列表项(见图),并有下面的程序:

Private sub Commandl_Click()

For k:Listl.ListCount_l To 0 step-1

Tf Listl.Selected(k)Then

List 2.AddItern Listl.List(k)

Listl.Removehem k

End If

Next k

End Sub

程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是

A.在List2中插入了“外语”、“物理”两项

B.在Listl中删除了“外语”、“物理”两项

C.同时产生A)和B)的结果

D.把Listl中最后1个列表项删除并插入到List2中


正确答案:C
解析:For k=Listl.ListCount-1 To O Step-l/*循环倒序遍历List1中的所有内容*/If List1.selected(k)Then /*如果被选中,那么*/
List2.Addltem Listl IJistl.List(k) /*List2中增加选中的条目*/
List1.Removeltem k /*把选中条目移除*/
End If /$结束条件If*/
Next k /*查看Ljst1中下一条目*/
所以正确的答案为c)。

第9题:

窗体上有List1、List2两个列表框,List1中有若干列表项(见图),并有下面的程序: Private Sub Command1_Click( ) For k=List1.ListCout-1 To 0 Step-1 If List1.Selected(k)Then List2.Addltem List1.List(k) List1.Removeltem k End If Next k End Sub程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是( )。

A.在List2中插入了“外语”、“物理”两项

B.在List1中删除了“外语”、“物理”两项

C.同时产生A和B的结果

D.把List1巾最后1个列表项删除并插入到List2中


正确答案:C
C。【解析】本题程序中的意思为如果选择了符合条件的数,那么将选中的项增加到List2列表框中,同时在List1中移除所选项,所以本题A和B选项均正确。

第10题:

设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是________。

A.List1.Text

B.List1.Index

C.List1.List

D.List1.ListIndex


List1中有ListCount-1个列表项