窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面

问题：

窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：

　　Private Sub Comand1_Click()

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

　　If List1.Selected(k) Then

　　List2.AddItem List1.List(k)

　　List1.RemoveItem k

　　End If

　　Next k

　　End Sub

　　程序运行时，按照图示在List1中选中2个列表项，然后单击Commandl命令按钮，则产生的结果是（）

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

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

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

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