主题：[求助]如何按列内容生成目录树？

[求助]表中类别只有一列（如图1），如何按类别列内容生成图2的目录树？
此主题相关图片如下：b.gif


此主题相关图片如下：a.gif

如果您把这样一列的数据分成多级类别（多列），会非常简单，否则，很麻烦！

遍历行,再遍历单元格.split("\") 后,  用 .Nodes.Add 应该可以完成......    猜测的~  

恩，确实是这样。实在不行的话，也只好这样子。

不会弄。

先顶再说。

这样不知满足您:
Dim tr As WinForm.TreeView = Forms("mls").Controls("TreeView1")
Dim nd As WinForm.TreeNode
Dim fs as String
tr.Nodes.Clear 
For Each dr as DataRow in datatables("表名").Select("","类别")
    If dr("类别") <> "" Then
        nd = Tr.Nodes.Add("Root1",dr("类别").split("\")(0))
        fs = dr("类别").split("-:special:1:-).length
        for n as integer = 1 to fs-1
            nd.Nodes.Add("Sub" & n,dr("类别").split("-:special:1:-)(n))
        next
    End If
Next

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:如何按列内容生成目录树.rar

不如狐爸的强!~

 第一次传的有问题，已经重新传了

大家可能没有意识到，这个例子很有用，我顶一下。