VB6.0中的treeview中没有selectedNode
在VB6.0中,通过:工程-部件—勾选[Microsoft Windows Common Controls 6.0(SP6)]而获得TreeView控件。
并且设置:TreeView1.Checkboxes = True
现在想如何去判定Chemkboxes是否被选定?
从网上查得:
TreeView1.SelectedNode.Checked=True为选定
在实际操作中却为何没有SelectedNode属性呢?
又以什么别的办法解决呢?
我现在想实现的功能是:用TreeView控件连接SQL数据库后,想灵活勾选,达到多项选的效果。
在此请各位大侠指点迷津了。
[解决办法]
Private Sub TVPower_NodeCheck(ByVal Node As MSComctlLib.Node)
Dim i As Integer
If Node.Children > 0 Then
For i = 0 To Node.Children - 1
TVPower.Nodes(Node.Child.Index + i).Checked = Node.Checked
Next
End If
End Sub