在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填空。
Private Sub Form_Load( )
List1.AddItem "AAAAA"
List1.AddItem "BBBBB"
List1.AddItem "CCCCC"
List1.AddItem "DDDDD"
End Sub
Private Sub Command1_Click( )
Dim L1 As Integer
L1= (12)
If L1＞=0 Then
List1.RemoveItem (13)
Labe11.Caption= (14)
Else
MsgBox"请选择要删除的项目”
End If
End Sub
参考答案：List1.ListIndex
解析： 本题提供的程序包括两个事件过程．其中Form_Load事件过程用来向列表框中添加项目，而Command1_Click事件过程删除列表框中被选择的项目，并在标签中显示列表框当前的项口数，需要填空的代码在这个事件过程中。为了删除列表框中指定的项目，可以使刚RemoveItem方法，其格式为：
列表框名称.Rer.oveItem索引值
其中的“索引值”是项目的地址，列表框中的项目从0开始计数，被选择的项目的索引值就是列表框的ListIndex属性。为了删除列表框中被选择的项目，必须先确定该项目的索引值，即列表框的LisIndex属性，然后就可以用RemoveItem方法将其删除。本题中的第一个空是被选择的项目的索引值，应为List1.ListInddx．并把它赋给变量L1。第二个空是RemoveItem方法的参数，即“索引值”，由于该值已保存在变量L1中，因此应填入L1。第三个空是列表框中当前的项目数，它就是列表框的ListCount属性。