![[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填](http://www.mshxw.com/aiimages/31/249314.png "[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填")
[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填空。
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=
If L1＞=0 Then
List1.RemoveItem
Labe11.Caption=
Else
MsgBox"请选择要删除的项目”
End If
End Sub
参考答案：
List1.ListCount问题解析:
解析无
