窗体Listl、List2两个列表框,Listl中有若干列表项(见图),并有下面的程序: Private sub Commandl_Click() For k:Listl.ListCount_l To 0 step-1 Tf Listl.Selected(k)Then List 2.AddItern Listl.List(k) Listl.Removehem k End If Next k End Sub 程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是