搬家第五天-109.Wincc V7.3 TreeView 控件初步使用2-节点的自动展开
前面的博客记录了怎么给一个TreeView控件填充数据,如果仅仅按照上面的代码,运行后所有的节点都是收缩的,你只看得到一个顶层节点,需要手动一个个展开,对最终使用的人不够友好。我们可以在语句最后添加这个语句:
TV.nodes("Class0").expanded=True
也可以写成这样子
TV.nodes(1).expanded=True
这样子就把顶层节点展开,显示出第一层节点。这样第二层、第三层……节点还是收缩的,如果希望运行时把所有的节点都展开,那么新增变量i定义,在脚本最后增加以下语句
For i=1 To TV.nodes.count
If TV.nodes.item(i).Children>0 Then
TV.Nodes(i).Expanded=True
End If
Next
这样一来,所有的节点就会自动展开了。