以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  筛选树  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187274)

--  作者:shqpldczj
--  发布时间:2023/7/5 9:01:00
--  筛选树
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("合同主表", "合同起始日")
trv.Nodes.Insert("显示所有行",0)

窗口启动后加载的筛选树我想合同起始日只显示年份可以吗?


--  作者:有点蓝
--  发布时间:2023/7/5 9:09:00
--  
参考这种:http://www.foxtable.com/webhelp/topics/0917.htm

Dim cmd As New SQLCommand
Dim
 dt As DataTable
cmd
.CommandText = "Select Distinct Year(合同起始日) As  From {合同主表}"
dt
 = cmd.ExecuteReader()
Dim
 trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv
.BuildTree(dt, "年")
trv
.Nodes.Insert("显示所有行",0)