VB中的combobox的问题!!!
VB中点击combobox的一个内容,然后在listbox中出现几个内容,要是点击bottom按钮之后删除listbox中的一个内容,如何再点击combobox相同的内容...
VB中点击combobox的一个内容,然后在listbox中出现几个内容,要是点击bottom按钮之后删除listbox中的一个内容,如何再点击combobox相同的内容之后不在listbox中显示除删除的内容以外的内容
展开
2个回答
展开全部
在往ListBox中添加内容前,先遍历ListBox的所有项,如果发现要添加的项已存在就不再添加,这样就不会使项目重复添加了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不在listbox中显示除删除的内容以外的内容,好绕啊
是不是只显示被删除的内容啊
是不是只显示被删除的内容啊
追问
。。。是不显示删除的内容···
追答
这需要配合记录文件,可以是一个文本文档
'删除的代码,在删除命令的事件里写:
For i = List1.ListCount - 1 To 0 Step -1
If List1.Selected(i) Then
List1.RemoveItem (i)
End If
Next i
写记录文件的代码,紧跟着上面的代码写:
Open App.Path & "\组合框的一个内容.txt" For Output As #1
For i = 0 To List1.ListCount - 1
Print #1, List1.List(i)
Next i
Close #1
'读取记录文件的代码,在Combo1的单击事件里写:
Dim strTxt As String
Open App.Path & Combo1.Text & ".txt" For Input Access Read As #1
Do While Not EOF(1)
Line Input #1, strTxt
List1.AddItem strTxt
Loop
Close #1
试一下可不可以
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询