循环修改
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")For Each nd As WinForm.TreeNode In trv.AllNodes If nd.level = 1 Then If nd.Text = "False" Then nd.text = "否" Else nd.text = "是" End If End IfNext