[填空题] 在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。Do While List2

[填空题] 在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。 Do While List2

[填空题] 在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。

Do While List2.ListCount

______

List2.RemoveItem()

Loop

正确答案：

List1.AddItemList2.List(0)

参考解析：

AddItem方法的一般格式为：obect.AddItem Item,Index 其中，“Item”用来指定添加到该对象的项目；“Index”用来指定新项目或行在该对象中的位置，第一项为0。如果所给出的Index值有效，则Item将放置在object中相应的位置。如果省略Index，当Sorted属性设置为True时，Item将添加到恰当的排序位置；当Sorted属性设置为False时，Item将添加到列表的结尾。 分析程序可知，程序是要通过循环来将List2中的项逐个添加到List1中，但因为是给List1添加一项，同时删除List2一项，因此添加项的索引号(ListIndex)始终是第1项0，因此添加项的语句是“List1.AddItem List2.List(0)”。 注意：①当列表框中的列表项被删除一项时，剩余的列表项会从0开始重新排序；②在本题中省略Index，则每次都自动添加到列表框尾部。