单选题窗体上有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
（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中
设窗体上有一个名为List1的列表框，并编写下面的事件过程： Private Sub List1_Click（ ） Dim ch As String ch=List1．List(List1．Listlndex) List1．RemoveItem List1．Listlndex List1．Addltem ch End Sub 程序运行时，单击一个列表项，则产生的结果是（ ）。A.该列表项被移到列表的最前面B.该列表项被删除C.该列表项被移到列表的最后面D.该列表项被删除后又在原位置插入
设计不能最大化和最小化的表单(如图5-10所示)：有2个列表List1和List2，List1的项目初始为A、B、C、D、E、P。当单击“＞”按钮，或在List1中双击项目时，将List1中当前选定的项目添加到List2中；当单击“＜”按钮，或在List2中双击项目时，将List2中当前选定的项目移回到Listl中。List1的项数为0时，则禁用“＞”按钮，否则启用该按钮；List2的项数为0时，则禁用“＜”按钮，否则启用该按钮。
（ 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 中
阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码。[应用说明]某应用程序在运行过程中的一个界面如下图所示：在“供选课程”列表框(名为Listl)中选择某个课程后，再单击“，”按钮(名称为cmdSelect)，就能将该课程复制到“所选课程”列表框(名称为List2)中(但要注意不要出现重复项)：如果单击“＞＞”按钮(名称为cmdSelAll)，就能将全部供选课程名复制到列表框List2中(注意应先删除List2中的已选项)；如果在“所选课程”列表框中选中某个课程，再单击“＜”按钮(名称为emdDelete)，就会从List2中删除该课程(未选课程时应不做处理)；如果单击“＜＜”按钮(名称为cmdDelAll)，就会从List2中删除所有已选课程。[Vsual Basic 程序代码]Private Sub CmdSelect_Cliek()For i = O To List2.ListCount - 1If Listl.Text = List2.List(i) Then Exit Sub '不要重复选择Next iList2.Addltem (1) '在List2中增添List1中所选的项End SubPrivate Sub CrndSelAll_Click()List2.Clear '先删除List2中的已有项For i = 0 To (2) '对List1中所有各项做循环处理List2.Addltem (3) '将该项增添到 List2中Next iEnd SubPrivate Sub CmdDelete_Cliek()If List2.Listlndex ＞= O Then '如果List2中有选中的项,List2.Removeltem (4) '则删除所选的项End IfEnd SubPrivate Sub CmdDelAll_Cliek()(5)End Sub
设在窗体中有一个名称为List1的列表框，其中有若干个项目(如图)。要求选中某一项后单击Command1按钮，就删除选中的项，则正确的事件过程是（ ）。A.Private Sub Command1 Click（ ） List1，Clear End SubB.Private Sub Command1 Click（ ） List1．Clear List1．ListIndex End SubC.Private Sub Command1 Click（ ） List1 Removeltem List1．ListIndex End SubD.Private Sub Command1 Click（ ） List1．Removeltem End Sub
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求；修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
在考生文件夹中有工程文件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保存在考生文件夹下。注意：该程序不完整，请在有问号“?”的地方填入正确内容，然后删除问号“?”及所有注释符“'”，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的数据文件也保存到考生文件夹下，否则没有成绩。
在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1，标题为“显示”的命令按钮，一个名称为List1的列表框。要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求：修改列表框的适当属性，使得运行时可以多选；去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
窗体上有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中
执行list1.list(list1.listcount)=“80”会()。A.会产生错误信息B.list1列表框最后一个表项被改为“80”C.list1列表框会增加一个“80”表项D.指定list1列表框的表项个数为80个
给程序的空白行选择适当的语句。程序段的功能是：依次自动将列表框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
有如下两个列表:list1=[(2),(0),(1),(8)]list2=[(2,),(0,),(1,),(8,)]那么,type(list1[0])和type(list2[0])分别是: Aint和tupleBint和intCtuple和tupleDtuple和int
窗体上有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.list（list1.listcount）=“80”会（）。A会产生错误信息Blist1列表框最后一个表项被改为“80”Clist1列表框会增加一个“80”表项D指定list1列表框的表项个数为80个
单选题设窗体上有一个名为List1的列表框，并编写下面的事件过程：程序运行时单击一个列表项，则产生的结果是（ ）。A该列表项被移到列表的最前面B该列表项被删除C该列表项被移动到列表的最后面D该列表项被删除后又在原位置插入
单选题窗体上有一个列表框控件List1。以下叙述中错误的是（ ）。AList1中有ListCount-1个列表项B当List1.Selected（i）=True，表明第i项被选中C设置某些属性，可以使列表框显示多列数据DList1.Text的值是最后一次被选中的列表项文本
单选题窗体上有名称为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