主题：如何在两棵相同的树上定位选中的节点

如果真的是两棵一模一样的树，那就好办了，假如改变目录树1的某节点复选框，目录树2跟着同步：

Dim tr As WinForm.TreeView = e.Form.Controls("TreeView2")
Dim nd As WinForm.TreeNode

Dim s As String = e.node.FullPath
Dim Values() As String
Values = s.split("\")
For Index As Integer = 0 To Values.Length - 1
    If Index = 0
        nd = tr.Nodes(Values(Index))
    Else
        nd = nd.Nodes(Values(Index))
    End If
Next
nd.Checked = e.Node.Checked '这就是您要的节点