请教： ListBox .....?
如何只修改 ListBox 中某一项？
现在我的做法是：
1. list1.clear
2. list1.additem 重新添加每一项
有没有其他方法？
问题点数：50、回复次数：3Top
1 楼enmity（灵感之源）回复于 2001-06-11 10:00:00 得分 0
sendmessageTop
2 楼y_shen（minicareer）回复于 2001-06-11 10:01:00 得分 30
List1.List(1)="***"Top
3 楼pp616（坏蛋）回复于 2001-06-11 10:22:00 得分 20
Sub DTlst(lst As ListBox, Oldlist As String, NewList As String)
Dim index As Long
index = 0
Do
If lst.List(index) = Oldlist Then lst.List(index) = NewList
index = index + 1
Loop Until index = lst.ListCount
End Sub
用这个过程把 。调用方法如下：
如list里有个叫"pp616"的项修改则
call DTlst(list,"pp616","新的内容")
这样就好了啊
Top
