以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  快速查找到目录树的节点，找不到方法了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62215)
--  作者：896539326
--  发布时间：2014/12/27 16:15:00
--  快速查找到目录树的节点，找不到方法了
如图 我想在text输入客户名称 bch，按button按钮 目录树自动展开到 b节点下面的子节点 bch并选中bch，如果没有bch这个子节点 就展开b节点就行了

Dim trv As WinForm.TreeView = e.Form.Controls("khmcmlb")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Text="lsd"
      ？？？？？
    End If
Next
我查找帮助文档 没有找到合适的方法 求大神指教
--  作者：Bin
--  发布时间：2014/12/27 16:35:00
--  
Dim trv As WinForm.TreeView = e.Form.Controls("khmcmlb")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Text="lsd"
      nd.ExpandAll()
    End If
Next
--  作者：896539326
--  发布时间：2014/12/27 20:36:00
--  
我已经想出来了 不是bin 大神这么写的 不过bin大神让我有了灵感 多谢