以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]树目录的排序怎么弄?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=3209)

--  作者:mr725
--  发布时间:2009/6/19 11:46:00
--  [求助]树目录的排序怎么弄?
生成树目录时,怎样按某列进行排序? 如:
有 科目代码 一级科目 明细科目 等列,按一级科目、明细科目生成两级的树目录,怎样使得树目录按照科目代码的顺序上下排列?
请教了~    
--  作者:狐狸爸爸
--  发布时间:2009/6/19 11:55:00
--  
BuildDataTree没有自定义排序的参数
--  作者:kylin
--  发布时间:2009/6/19 11:56:00
--  

我也需要类似如此的东西,顶一下


--  作者:mr725
--  发布时间:2009/6/19 11:58:00
--  
以下是引用狐狸爸爸在2009-6-19 11:55:00的发言:
BuildDataTree没有自定义排序的参数

那财务软件的习惯要按照科目代码顺序来操作的 不然绝大多数会计人员和审计人员会很难受的啊~  希望树目录能有个排序功能(自定义排序的参数)~  谢谢了。

[此贴子已经被作者于2009-6-19 11:58:39编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/6/19 12:08:00
--  
我看看能否给BuildDataTree加个参数。
图片点击可在新窗口打开查看
[此贴子已经被作者于2009-6-19 12:08:47编辑过]

--  作者:mr725
--  发布时间: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编辑过]