在窗体上添加1个列表框、1个命令按钮和1个标签，其名称分别为List1，Command1和Label1,通过属性窗口把列表框中的项目设置为“第一个项目”，“第二个项目”，“第三个项目”，“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮 ，将所选择的项目删除，并在标签中显示列表框当前的项目数。将程序补充完整。

Private Sub Command1_Click()

    If List1.ListIndex >=  Then

        List1.RemoveItem

        Label1.Caption =

    Else

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

   

End Sub