如何展开treeview所有节点呢？TVW.Nodes(1).Expanded = True 只能展开根节点呀？

Question

如何展开treeview所有节点呢？TVW.Nodes(1).Expanded = True 只能展开根节点呀？
-------------------------------
如果展开所有节点，我应该如何做呢？
就算可以一个一个展开，我也不知道 nodes(index)中的index值如何填写呀，1.我是不是要得到index的最大值，然后循环展开。如果这样可以，我如何得到index的最高值呢？
2.是不是应该有专门展开所有节点的方法呢？

Answer 1

dim nodx as node
for each nodx in TVW.Nodes
    nodx.Expanded = True 
next
逐个展开

Answer 2

        For i = 1 To .Nodes.Count
            If .Nodes.Item(i).Children > 0 Then .Nodes(i).Expanded = True
        Next