以下为代码
Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In e.Node.AllNodes nd.Checked = e.Node.CheckedNext
很奇怪 ，有时 选中后 子节点不会改变状态！ 也不是经常 。。。 就是偶尔，是不是要判断某些条件？
加好友 
发短信
Post By：2015/9/25 12:02:00 [只看该作者]
