这样写对不对?谢谢!
Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")For Each nd As WinForm.TreeNode In tv.AllNodes If nd.Checked = False Then
代码......
End IfNext