主题：请教目录树

1、先生目录树；

2、循环目录树每一个节点，判断level是否大于等于2，如果大于，就在一个新的目录树里加入节点；

方法二：循环每一个节点，判断level是否小于2，如果小于，就右移一列，把节点删除。

你什么都要别人帮你做。

上传具体例子。

mark 拷贝节点

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")
Dim ls As New List(Of Object)
ls.add(trv2)
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Level >= 2 Then
        Dim idx As Integer = nd.level-2
        Dim nnd = ls(idx).Nodes.Add(nd.Name, nd.Text)
        If nd.Nodes.count > 0 Then
            If idx >= ls.count - 1 Then
                ls.add(nnd)
            Else
                ls(idx+1) = nnd
            End If
        End If
    End If
Next

放两个目录树，一个隐藏一个显示就行啊。

不会做，就上具体例子。