以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录快速定位  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79720)
--  作者：农村人
--  发布时间：2016/1/7 20:52:00
--  目录快速定位
如何通过代码，能够快速定位到指定内容的节点
--  作者：大红袍
--  发布时间：2016/1/7 21:28:00
--  

循环每一个节点。

 

 Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Text.IndexOf("上海") >= 0 Then
        trv.SelectedNode = nd
        Exit For
    End If
Next