填空题 Private Sub Command1_ Click( )
If List1. ListIndex ＞ = (1) Then List1. RemoveItem (2) Label1. Caption = (3)
Else
MsgBox “请选择要删除的项目”
End If
End Sub