窗体上有List1、List2两个列表框，程序运行时，在两个列表框中分别选中1个项目，如图a所示，单击名称为Command1的“交换”按钮，则把选中的项目互换，互换后的位置不限，如图b所示。下面的程序可实现这一功能，请填空。
Private Sub Command1_Click()
If List1.Text=”” or List2.Text=”” Then
MsgBox”请选择交换的物品！”
Else
List1.AddItem List2.Text
List2.RemoveItem （ 11 ）
（ 12 ）
List1.RemoveItem List1.ListIndex
End If
End Sub