以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]继续选择这个节点  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=179395)

--  作者:2425004926
--  发布时间:2022/8/21 18:41:00
--  [求助]继续选择这个节点
老师指点一下
     代码。。。。。。
上面的代码是对节点的操作,重新再次更新后生成的目录树选择的节点就消失了,下面是要继续选择这个节点
    For Each nd As WinForm.TreeNode In tr.AllNodes
        If nd.Name = txt Then  ‘txt是返回的节点name,具有唯一性
            Dim sz() As String = nd.FullName.Split("\\") \'节点路径变为数组
            For i As Integer = 0 To sz.length - 1
                
            Next
            tr.SelectedNode = tr.Nodes(sz(0)).Nodes(sz(1)).Nodes(sz(2)) \'再次选择这个节点,以三层为例

        End If
    Next
蓝色代码应该怎么写,才能照顾到各层节点,必竟数组个数是变化的?
是否继续选择这个节点还有其它更便捷的方法?


--  作者:有点蓝
--  发布时间:2022/8/21 21:21:00
--  
    For Each nd As WinForm.TreeNode In tr.AllNodes
        If nd.Name = txt Then  ‘txt是返回的节点name,具有唯一性
            tr.SelectedNode = nd \'再次选择这个节点

        End If
    Next

--  作者:2425004926
--  发布时间:2022/8/21 21:31:00
--  
感谢感谢!
原来这么简单