以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录树中的日期列  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23865)
--  作者：kevin
--  发布时间：2012/9/22 1:11:00
--  目录树中的日期列
 

Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("订单", "日期|客户|雇员")

 

如何以 日期年\\日期月\\客户\\雇员  的形式显示目录树
--  作者：lin_hailun
--  发布时间：2012/9/22 9:31:00
--  
 增加年列和月列，才能达到你要的效果

 参考：http://www.foxtable.com/help/topics/1285.htm

 或者，自己这样编写代码，参考

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "SELECT DISTINCT Year(日期) As 年, Month(日期) As 月, 产品 From {订单}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|产品")