搬家第五天-114.Wincc V7.3 TreeView 控件初步使用7-checkbox的单选性

我们在TreeView添加checkbox后，默认是可以多选的，有些情况下我们希望用户的选择是唯一的、排他性的，不允许多选，本文介绍如何实现这种功能。假设画面上有一个TreeView控件，已经装入了数据，已经设置了checkbox，在TreeView控件的NodeCheck事件中添加以下VBS代码：

Sub NodeCheck(ByVal Item,  ByRef Node) 
Dim TV,Count,NodeCheck,i,key
set TV=ScreenItems("TV")
Count=TV.nodes.count
NodeCheck= Node.checked
key=node.key
For i=1 To count
    TV.nodes.item(i).checked=False
Next
TV.nodes.item(key).checked=NodeCheck
End Sub

保存后运行，当点击TreeView控件上checkbox时候，就可以实现选择唯一性了。