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

序：

Private Sub Comand1_Click （）

F．or k=List1.ListCount-1 To 0 Step -1

If List1.Selected （ k ） Then

List2.AddItem List1.List （ k ）

List1.RemoveItem k

E．nd If

Next k

E．nd Sub

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

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

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

C． ）同时产生 A ）和 B ）的结果

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

[单选题]窗体上有List1、List2两个列表框，List1中有若干列表项（如下图所示），并有下面的程序：程序运行时，按照下图所示在List1中选中两个列表项

[单选题]窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是A．0B．10C．01234D．程序出错

[单选题]窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1（Simple）

[单选题]窗体上有名称为command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1（Simple）

[单选题]窗体上有一个列表框控件List1。以下叙述中错误的是（　　 ）。A.List1中有ListCount-1个列表项B.当List1.Selected（i

[单选题]在窗体上有一个名称为List1列表框和一个名称为Command1的按钮，List1的MultiSelect属性设置为2。当单击Command1按钮时，将会把所有选中的选项全部删除。下列程序缺少的一句是______。Private Sub Command1_ Click () for i = List1. ListCount- 1 To 0 Step- 1 if ______ = True then List1. RemoveItem i End if Next iEnd SubA．List1.S

[单选题]引用列表框List1被选中项数据应使用( )。A． List1.listB． List1.listCountC． List1.IndexD． List1.Text

[单选题]如果列表框List1中没有被选定的项目，则执行List1.RemoveItem List1.ListIndex语句的结果是（）。A . 移去第一项B . 移去最后一项C . 移去最后加入列表框中的一项D . 以上答案都不对

[判断题] 清除list1列表框对象的内容的语句是list1.cls。A . 正确B . 错误

[单选题]窗体上有一个命令按钮Commalld1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command1_Click() Dim In As Integer In=______ List.Removc Ind End Sub 则在程序的空白行的语句是( )。A．List1.IndexB．List1.ListIndexC．List1.TextD．List1.ListCount