[讨论]TreeView增强功能！
在原有的基础上增加形如MSDN的索引功能，在文本框中输入关键字时，ListBox中自动匹配！随风逐流，你来吧！
2007-09-27 21:52
那干啥不用PM？
2007-09-27 21:53
2007-09-27 22:05
2007-09-28 08:59
2007-09-28 09:02
2007-09-28 09:14
2007-09-28 09:16
2007-09-28 09:18
例如文本和LIST
在TEXTBOX1_CHANGE里面写
dim i as long
if list.ListCount>0 then
for i=0 to list.ListCount-1
if len(textbox1.text)<= list.list(i) then
if textbox1.text=left(list.list(i),len(textbox1.text)) then
list.ListIndex=i
exit for
end if
end if
next
end if
先试试
2007-09-28 09:30
有点小错误.
if len(textbox1.text)<= list.list(i) then
改成
if len(textbox1.text)<= len(list.list(i)) then
2007-09-28 09:37