Dim tv As WinForm.TreeView = e.Form.Controls("TreeView筛选树")For Each nd As WinForm.TreeNode In tv.AllNodes nd.Checked = FalseNext