设窗体上有一个名为List1的列表框，并编写下面的事件过程：Private Sub List1_Click( ) Dim ch As String Ch=List1.List(List1.ListIndex) List1.RemoverItem List1.ListIndex List1.AddItem chEnd Sub程序运行时，单击一个列表框，则产生的结果是（ ）

A．该列表项被移到列表的最前面

B．该列表项被删除

C．该列表项被移动列表的最后面

D．该列表项被删除后又在原位置插入