[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，

[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序，

[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。

下面是实现上述功能的程序，请填空。

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】

Labell.Caption= 【14】

Else

MsgBox("请选择要删除的项目")

End If

End Sub

正确答案：

[12]List1.ListIndex [13]L1 [14]List1.ListCount解析：[分析]： 本题提供的程序包括两个事件过程，其中Form Load事件过程用来向列表框中添加项目，而Command1_Click事件过程删除列表框中被选择的项目，并在标签中显示列表框当前的项目数，需要填空的代码在这个事件过程中。为了删除列表框中指定的项目，可以使用RemoveItem方法，其格式为：列表框名称．RemoveItem 索引值 其中的“索引值”是项目的地址，列表框中的项目从0开始计数，被选择