Treeview+图标的用法。

ningyong58

实现上述目标的Treeview的经典程序是
TreeView1.Nodes.Add , , ,数组数据, 1
程序见 Treeview+ListView.xls

在此讨论的问题。不用上述方法采用附件（TreeViewSample.xls）这个例子，如何实现上面的效果。

TreeViewSample.xls程序摘抄。
    With Me.TreeView1
        For i = 1 To 5
            Set xNode = .Nodes.Add
            NodeKey = "Node - " & i
            With xNode
                .Key = NodeKey
                .Text = "Node - " & i
                .Expanded = False
            End With
            Me.ComboBox1.AddItem ("Node - " & i)
            For j = 1 To 7
                Set xNode = .Nodes.Add(NodeKey, tvwChild)
                NodeKey2 = "Node - Child - " & i & j
                With xNode
                    .Key = NodeKey2
                    .Text = "Child - " & j
                End With
                Me.ComboBox1.AddItem ("Child - " & j)
                For k = 1 To 10
                    Set xNode = .Nodes.Add(NodeKey2, tvwChild)
                    With xNode
                        .Text = "Child2 - " & k
                    End With
                    Me.ComboBox1.AddItem ("Child2 - " & k)
                Next k
            Next j
        Next i
    End With
上传带树形结构.rar (99.5 KB, 下载次数: 390)

2010-3-27 11:19 上传

点击文件名下载附件

[ 本帖最后由 ningyong58 于 2010-3-27 11:19 编辑 ]

zhc19620430

这里有个空，看看学习。

execl

先下了，好好消化下