- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]树目录的排序怎么弄？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3209)
-- 发布时间：2009/6/19 11:46:00
-- [求助]树目录的排序怎么弄？
生成树目录时，怎样按某列进行排序？ 如：
有 科目代码 一级科目 明细科目 等列，按一级科目、明细科目生成两级的树目录，怎样使得树目录按照科目代码的顺序上下排列？
请教了～
-- 发布时间：2009/6/19 11:55:00
--
BuildDataTree没有自定义排序的参数
-- 发布时间：2009/6/19 11:56:00
--
我也需要类似如此的东西，顶一下
-- 发布时间：2009/6/19 11:58:00
--
以下是引用狐狸爸爸在2009-6-19 11:55:00的发言：
BuildDataTree没有自定义排序的参数
BuildDataTree没有自定义排序的参数
那财务软件的习惯要按照科目代码顺序来操作的 不然绝大多数会计人员和审计人员会很难受的啊～ 希望树目录能有个排序功能（自定义排序的参数）～ 谢谢了。
[此贴子已经被作者于2009-6-19 11:58:39编辑过]
-- 发布时间：2009/6/19 12:08:00
--
我看看能否给BuildDataTree加个参数。
[此贴子已经被作者于2009-6-19 12:08:47编辑过]
-- 发布时间：2009/6/19 12:21:00
--
我变通办法：
增加一列： 代码及科目 代码：
for i as integer = 0 to currenttable.count -1
currenttable(i,"代码及科目") = "" & currenttable(i,"一级代码") & " " & "" & currenttable(i,"一级科目") & ""
next
再：
Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildDataTree("flxsb", "", "代码及科目", "明细科目")
这样树目录就是按科目代码的顺序上下排序了。
[此贴子已经被作者于2009-6-19 17:37:34编辑过]