以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录树获取和选定节点同一级的所有节点名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=108754)

--  作者:llh0824
--  发布时间:2017/10/28 13:55:00
--  目录树获取和选定节点同一级的所有节点名称
请教一下老师,如何获取目录树中和选定节点同一级的所有节点名称
--  作者:有点蓝
--  发布时间:2017/10/28 14:46:00
--  
ParentNode.Nodes


Dim tr As WinForm.TreeView
Dim pd As WinForm.TreeNode
tr = Forms("窗口1").Controls("TreeView1")
pd = tr.SelectedNode.ParentNode
For Each n As WinForm.TreeNode In pd.Nodes
    Output.Show(n.Name)
Next