单选题窗体上有List1、List2两个列表框，List1中有若干列表项（如下图所示），并有下面的程序：程序运行时，按照下图所示在List1中选中两个列表项（物理和外语），然后单击Command1命令按钮，则产生的结果是（ ）。A在List2中插入了“外语”“物理”两项B在List1中删除了“外语”“物理”两项C同时产生A项和B项的结果D把List1中最后一个列表项删除并插入到List2中
单选题
窗体上有List1、List2两个列表框，List1中有若干列表项（如下图所示），并有下面的程序：程序运行时，按照下图所示在List1中选中两个列表项（物理和外语），然后单击Command1命令按钮，则产生的结果是（ ）。
A
在List2中插入了“外语”“物理”两项
B
在List1中删除了“外语”“物理”两项
C
同时产生A项和B项的结果
D
把List1中最后一个列表项删除并插入到List2中
参考解析
解析：
本题中，点击事件的响应过程：遍历整个List1中的列表项，如果列表项被选中，则将其添加到List2，然后将它们从List1中删除，所以选项A和B都会发生。
本题中，点击事件的响应过程：遍历整个List1中的列表项，如果列表项被选中，则将其添加到List2，然后将它们从List1中删除，所以选项A和B都会发生。
相关考题：
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项目，如图所示。请在空白处填入适当的内容，将程序补充完整。Private Sub Form_Load（）List1.AddItem "北京"List1.AddItem "上海"List1.AddItem "河北"End SubPrivate Sub List1 【9】 （）Labe1.Caption= 【10】End Sub
（18）设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表项内容的是（ ）。A）List1.ListB）List1.ListIndexC）List1.TextD）List1.Index
（10）在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表List2中所有列表项目移入列表框List1中的项目从List2中的项目从List2中删除。 Do While List2.ListCount List2.RemoveItem0 Loop
（8）在程序的空白处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除 Do While List2.ListCount _____________________ List2.RemoveItem 0 Loop
窗体卜有Listl、List2两个列表框，Listl中有若干列表项(见图)，并有下面的程序：Private sub Commandl_Click()For k：Listl．ListCount_l To 0 step-1Tf Listl．Selected(k)ThenList 2．AddItern Listl．List(k)Listl．Removehem kEnd IfNext kEnd Sub程序运行时，按照图示在List1中选中2个列表项，然后单击Command1命令按钮，则产生的结果是A．在List2中插入了“外语”、“物理”两项B．在Listl中删除了“外语”、“物理”两项C．同时产生A)和B)的结果D．把Listl中最后1个列表项删除并插入到List2中
设计不能最大化和最小化的表单(如图5-10所示)：有2个列表List1和List2，List1的项目初始为A、B、C、D、E、P。当单击“＞”按钮，或在List1中双击项目时，将List1中当前选定的项目添加到List2中；当单击“＜”按钮，或在List2中双击项目时，将List2中当前选定的项目移回到Listl中。List1的项数为0时，则禁用“＞”按钮，否则启用该按钮；List2的项数为0时，则禁用“＜”按钮，否则启用该按钮。
窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Labe11、 Caption属性为"Sum"的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如下图所示。以下是实现上述功能的程序，请填空。Pfivate Sub Form_Load()Fori=1 To 100If iMod7=
窗倒上有1个名为List1的列表框，其中已经输入了若干个项目(如图3所示)；还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有以下程序：程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是（ ）。A. 京B. 北京南京C. 南京北京D. 没有匹配的项目
（ 31 ） 窗体上有 List1 、 List2 两个列表框 ， List1 中有若干列表项 （ 见图 ） ， 并有下面的程序：Private Sub Comand1_Click （）For k=List1.ListCount-1 To 0 Step -1If List1.Selected （ k ） ThenList2.AddItem List1.List （ k ）List1.RemoveItem kEnd IfNext kEnd Sub程序运行时，按照图示在 List1 中选中 2 个列表项，然后单击 Commandl 命令按钮，则产生的结果是A ）在 List2 中插入了 “ 外语 ” 、 “ 物理 ” 两项B ）在 List1 中删除了 “ 外语 ” 、 “ 物理 ” 两项C ）同时产生 A ）和 B ）的结果D ）把 List1 中最后 1 个列表项删除并插入到 List2 中
设窗体上有一个列表框控件List1，且其中含有若干列表项。则以下能够表示当前被选中的列表项内容的是______。A．List1. ListB．List1. ListIndexC．List1. IndexD．List1. Text
设窗体上有一个名为List1的列表框，并编写下面的事件过程：Private Sub List1_Click（ ）Dim ch As Stringch=List1．List(List1．Listlndex)List1．RemoveItem List1．ListlndexList1．Addltem chEnd Sub程序运行时，单击一个列表项，则产生的结果是（ ）。A.该列表项被移到列表的最前面B.该列表项被删除C.该列表项被移到列表的最后面D.该列表项被删除后又在原位置插入
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求；修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
在窗体上绘制一个列表框，名为List1，通过属性窗口向列表框中添加4个项目，分别为ltem1、Item2、Item3和Item4。编写适当的事件过程，使程序运行后，每次单击列表框中的任何一项，则总在最后面添加一项Item5。程序的运行情况如下图所示。注意：程序中不得使用任何变量c文件必须存放在考生文件夹中，工程文件名为 execise42.vbp，窗体文件名为execise42.frm。
在考生文件夹中有工程文件sjt3．vbp，其中的窗体如图4所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的，最大值(或最小值)，并显示在标签Label2中。 请去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。(2)在考生文件夹中有一个工程文件sjt4．vbp。窗体上已有控件，如图5所示。请在属性窗口中将List1设置为可以多项选择(允许使用Shift键或Ctrl键进行选择)列表项。要求：双击List1中的某一项时，该项目被添加到List2中，同时在List1中清除该项目。若单击“”按钮，List1 中所有的项目显示在List2中(List2中已有项目不变)，List1中的内容不变。 要求：按照题目要求设置控件属性，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不得修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
在考生文件夹下有工程文件execise20.vbp及窗体文件execise20.frm。在窗体Form1上有一个名为List1的列表框，列表框中有若千的列表项，通过属性窗口设置列表框的 MultiSelect属性为1。还有两个命令按钮，名称分别是Cmd1和Cmd2，标题分别是Select All和Save(如下图所示)。要求在程序运行时，单击Select All按钮则将List1中的全部列表项选中，然后单击Save按钮，将List1中的全部列表项写入文本文件out20.txt中，并将out20.txt保存在考生文件夹下。注意：该程序不完整，请在有问号“?”的地方填入正确内容，然后删除问号“?”及所有注释符“'”，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的数据文件也保存到考生文件夹下，否则没有成绩。
窗体上有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中
给程序的空白行选择适当的语句。程序段的功能是：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。( ) Do While List2.List Count ______ List2.Removeltem0 LoopA．List1.AddltemList2.List(0)B．List1.Addltem List2.TextC．List2.AddltemList1.List(0)D．List2.AddltemList1.Text
窗体上有一个命令按钮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．程序出错
窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：Private Sub Command1_Click（ ）For k=List1．ListCout-1 To 0 Step-1If List1．Selected(k)ThenList2．Addltem List1．List(k)List1．Removeltem kEnd IfNext kEnd Sub程序运行时，按照图示在List1中选中2个列表项，然后单击Command1命令按钮，则产生的结果是（ ）。A.在List2中插入了“外语”、“物理”两项B.在List1中删除了“外语”、“物理”两项C.同时产生A和B的结果D.把List1巾最后1个列表项删除并插入到List2中
窗体上有list1、list2两个列表框，程序运行时，在两个列表框中分别选中1个项目，如图a所示，单击名称为Command1的“交换”按钮，则把选中的项目互换，互换后的位置不限。如图b所示。下面的程序可实现这一功能，请填空。Private Sub Command1_Click()If list1.text=””or list2.text””thenMsgbox”请选择交换的物品！”ElseList1.additem list2.textList2.removeitem【11】【12】List1.removeitem list1.listindexEnd IfEnd Sub
某html文档中有如下代码，则在浏览器中打开该文档时显示为( )。＜form＞ List1: ＜inputtype="text"name="List1"/＞ ＜br/＞ LiSt2: ＜inputtype="text"name="List2"/＞ ＜/form＞
执行list1.list（list1.listcount）=“80”会（）。A、会产生错误信息B、list1列表框最后一个表项被改为“80”C、list1列表框会增加一个“80”表项D、指定list1列表框的表项个数为80个
单选题设窗体上有一个列表框控件List1含有若干列表项，以下能表示当前被选中的列表项内容的是（ ）。AList1.ListBList1.ListIndexCList1.TextDList1.Index
单选题窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：程序运行时，选中一个列表项，然后单击Command1按钮，则产生的结果是（ ）。A若选中的不是最前面的列表项，则选中的列表项与它前一个列表项互换位置B选中的列表项与它前面的列表项互换位置C若选中的不是最后面的列表项，则选中的列表项与它后一个列表项互换位置D选中的列表项与它后面的列表项互换位置
单选题窗体上有一个列表框控件List1。以下叙述中错误的是（ ）。AList1中有ListCount-1个列表项B当List1.Selected（i）=True，表明第i项被选中C设置某些属性，可以使列表框显示多列数据DList1.Text的值是最后一次被选中的列表项文本
单选题设窗体上有一个名为List1的列表框，并编写下面的事件过程：程序运行时单击一个列表项，则产生的结果是（ ）。A该列表项被移到列表的最前面B该列表项被删除C该列表项被移动到列表的最后面D该列表项被删除后又在原位置插入
单选题窗体上有名称为command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1（Simple），并有如下事件过程：上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是（ ）。A将For循环的终值改为List1.ListCountB将List1.Selected（i）＝True改为List1.List（i）.Selected＝TrueC将List2.AddItem Text改为List2.AddItem List.List（i）D将List2.AddItem Text改为List2.AddItem List.ListIndex