[单项选择题] 设窗体上有一个名为List1的列表框，并编写下面的事件过程： Private Sub List1_Click() Dim ch As Str

[单项选择题] 设窗体上有一个名为List1的列表框，并编写下面的事件过程：

Private Sub List1_Click()

Dim ch As String

ch=List1. List(List1. ListIndex)

List1. RemoveItem List 1. ListIndex

List1. AddItem ch

End Sub

程序运行时，单击一个列表项，则产生的结果是( )。

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

B．该列表项被删除

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

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

C

在程序运行时删除列表框中的项目可以使用RemoveItem方法，其语法为：列表框,RemoveItem索引号，列表框的属性ListIndex返回当前所选项日的索引号，因此删除列表框选中项目的语句为：List1. RemoveItem List1, ListIndex。组合框的AddItem方法可以将ch加入到组合框的尾部。