下列程序的功能是:依次将列表框List2中的项目移入列表框Listl中,并将列表框List2中移走的项目删除,给程序的空白行选择适当的语句( )。 List1.Addltem List2.List(0) List2.ReMoveltem 0 LoopA.Do Until List2.ListCountB.Do While List2.ListCountC.Do Until List1.ListCountD.Do While List1.ListCount
下列程序的功能是:依次将列表框List2中的项目移入列表框Listl中,并将列表框List2中移走的项目删除,给程序的空白行选择适当的语句( )。 List1.Addltem List2.List(0) List2.ReMoveltem 0 Loop
A.Do Until List2.ListCount
B.Do While List2.ListCount
C.Do Until List1.ListCount
D.Do While List1.ListCount
相关考题:
在窗体上画一个名称为Listl酌列表框,一个名称为Labell的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是:______。A. Private Sub Listl_Click() Labell.Caption=Listl.ListIndex End SubB.Private Sub Listl_Click() Labell.Name=Listl.ListIndex End SubC.Private Sub Listl_click() Labell.Name=Listl.Text End SubD.Private Sub Listl_Click() Labell.Caption=Listl.Text 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中
在窗体上画一个名称为Listl的列表框,一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A.Private Sub Listl_Click() Labell.Capfion=Listl.Listlndex End SubB.PrivateSubLial click() Labell.Name=Listl.Listlndex End SubC.PrivateSubListl click() Labell.Name=Listl.Text End SubD.Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub
在窗体上绘制一个名称为List1的列表框,一个名称为Labe11的标签,列表框中显示若干个项目。当单击列表框中的某个项目时,在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是A.PriVate Sub List1_Click() Labell.CaptiOn=List.ListIndex End SubB.PriVate Sub List1_Click() Labell.Name=listl.ListIndex End SubC.Private Sub List1_Click() Labell.Name=Listl.Text End SubD.Private Sub List1_Click() Labell.Caption=List1.Text End Sub
阅读以下应用说明以及用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
在窗体上画一个名称为Lablel的标签和一个名称为Listl的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Labell中显示所选中的项目,如图所示。请在______处填入适当的内容,将程序补充完整。Private Sub Form. load()Listl.AddItem “北京”List1.AddItem “上海”List1.AddItem “河北”End SubPrivate Sub ______()Labell.Caption=______End Sub
给程序的空白行选择适当的语句。程序段的功能是:依次自动将列表框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