[讨论]TreeView增强功能!
在原有的基础上增加形如MSDN的索引功能,在文本框中输入关键字时,ListBox中自动匹配!随风逐流,你来吧!
那干啥不用PM?
例如文本和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
先试试
有点小错误.
if len(textbox1.text)<= list.list(i) then
改成
if len(textbox1.text)<= len(list.list(i)) then