主题：如何判断目录树是不是在展开状态？

通用代码，哪种目录树都适用：

NodeMouseDoubleClick

e.Sender.StopRedraw
For Each nd As WinForm.TreeNode In e.Sender.AllNodes
    If nd.Name <> e.Node.Name AndAlso e.Node.Nodes.Count > 0 Then
        nd.Collapse
    End If
    e.Node.EnsureVisible
    e.Sender.SelectedNode = e.Node
Next
e.Sender.ResumeRedraw