[单项选择题] 窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：Private sub Command1_Click()For k=List1.ListCo

[单项选择题] 窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：Private sub Command1_Click()For k=List1.ListCo

[单项选择题] 窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：Private sub Command1_Click()For k=List1.ListCoum-1 To 0 step-1If List1.Selected(k) ThenList2.AddItem List1.List(k)List1.RemoveItem kEnd IfNext kEnd Sub程序运行时，按照图示在List1中选中2个列表项，然后单击Command1命令按钮，则产生的结果是（）

A．在List2中插入了“外语”、“物理”两项

B．在List1中删除了“外语”、“物理”两项

C．同时产生A)和B)的结果

D．把List1中最后1个列表项删除并插入到List2中

正确答案：

CIf List1.selected(k)Then List2.Addhem List1 List1.List(k) List1.Removehemk End If Next k 所以正确的答案为C)。

参考解析：

For k=List1.ListCount-1 To 0 Step-1