主题：[求助]如何实现单选目录树

去编写AfterCheckedNode事件，如

If e.Node.Level = 0 Then
    If e.node.Checked Then
        For Each nd As WinForm.TreeNode In e.Sender.Nodes
            nd.Checked = False
        Next
        e.node.Checked = True
    End If
End If