![[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%94%BB%E4%B8%80%E4%B8%AA%E5%88%97%E8%A1%A8%E6%A1%86%E3%80%81%E4%B8%80%E4%B8%AA%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E5%92%8C%E4%B8%80%E4%B8%AA%E6%A0%87%E7%AD%BE%E3%80%82%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E5%9C%A8%E5%88%97%E8%A1%A8%E6%A1%86%E4%B8%AD%E9%80%89%E6%8B%A9%E4%B8%80%E4%B8%AA%E9%A1%B9%E7%9B%AE%EF%BC%8C%E7%84%B6%E5%90%8E%E5%8D%95%E5%87%BB%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%EF%BC%8C%E5%8D%B3%E5%8F%AF%E5%B0%86%E6%89%80%E9%80%89%E6%8B%A9%E7%9A%84%E9%A1%B9%E7%9B%AE%E5%88%A0%E9%99%A4%EF%BC%8C%E5%B9%B6%E5%9C%A8%E6%A0%87%E7%AD%BE%E4%B8%AD%E6%98%BE%E7%A4%BA%E5%88%97%E8%A1%A8%E6%A1%86%E5%BD%93%E5%89%8D%E7%9A%84%E9%A1%B9%E7%9B%AE%E6%95%B0%E3%80%82%E4%B8%8B%E9%9D%A2%E6%98%AF%E5%AE%9E%E7%8E%B0%E4%B8%8A%E8%BF%B0%E5%8A%9F%E8%83%BD%E7%9A%84%E7%A8%8B%E5%BA%8F%EF%BC%8C%E8%AF%B7%E5%A1%AB.png "[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填,第1张")
[填空题] 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填空。
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
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）