当前代码如下:
Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("干部花名册", "工作单位|级别归属|身份性质|姓名")
For i As Integer = i To tv.Nodes.Count-1
tv.Nodes(i).Text=tv.Nodes(i).Name & "()"
For i1 As Integer = i1 To tv.Nodes(i).Nodes.Count -1
tv.Nodes(i).Nodes(i1).Text=tv.Nodes(i).Nodes(i1).Name & "()"
For i2 As Integer = i2 To tv.Nodes(i).Nodes(i1).Nodes.Count -1
tv.Nodes(i).Nodes(i1).Nodes(i2).Text=tv.Nodes(i).Nodes(i1).Nodes(i2).Name & "()"
Next
Next
Next
运行后没有将所有的0 1 2 三个节点标题全部加上对应的“()” 麻烦老师帮忙看看 谢谢!
此主题相关图片如下:11.png
