在程序的空白行处填写适当的语句 完成下列功能:依次自动将列表框List2中所有列表项目移入列表框Li
在程序的空白行处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除。 Do While List2.ListCount ______ List2.Removeltem 0 Loop
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:List1.Addltem List2.List(0)
AddItem方法的一般格式为:object.AddItemItem,Index其中,“Item”用来指定添加到该对象的项目;“Index”用来指定新项目或行在读对象中的位置,第一项为0。如果所给出的Index值有效,则Item将放置在object中相应的位置。如果省略Index,当Sorted属性设置为True时,Item将添加到恰当的排序位置;当Sorted属性设置为False时,Item将添加到列表的结尾。分析程序可知,程序是要通过循环来将List2中的项逐个添加到List1中,但因为是给List1添加一项,同时删除List2一项,因此添加项的索引号(ListIndex)始终是第1项0,因此添加项的语句是“List1.AddltemList2.List(0)”。注意:①当列表框中的列表项被删除一项时,剩余的列表项会从0开始重新排序;②在本题中省略Index,则每次都自动添加到列表框尾部。
相似问题
下列程序的功能是:找出给定的12个数中最大的一个数 然后输出这个数以及经在原来12 option B
下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及经在原来12 option Base 1 Private Sub Form_Click() Dim x x = Arra
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时 将图片加载到图片框中
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向
在菜单编辑器中建立了一个菜单 名为pmenu 用下面的语句可以把它作为弹出式菜单弹出 请填空。 Fo
在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。 Forml.【 】pmenu请帮忙给出正确答案和分析,谢谢!
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)” 直至“1/(2n+1)”小于10-4。
以下程序用于计算“1+1 3+1 5+…+1 (2n+1)”,直至“1 (2n+1)”小于10-4。阅读下面程序,请在【 】和【 】处填上正确内容。 Private Sub Command1_C
下列程序实现的功能是:当在窗体上单击时 从键盘上读入5个学生的学号 姓名 英语成绩并存入到文件d:/
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d: stu1 dat中,然后从文件中读出第3个人的学号、姓
