Question

vb treeview如何删除叶节点

如题叶节点:即没有子节点的节点.

Answer 1

Dim i As Integer
Dim c As New Collection
For i = 1 To Me.TreeView1.Nodes.Count
If Me.TreeView1.Nodes(i).Children = 0 Then c.Add i
Next
For i = c.Count To 1 Step -1
Me.TreeView1.Nodes.Remove c(i)
Next