Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
在窗口的AfterLoad事件中写以下代码:
Dim g As New GroupTableBuilder("统计表1", DataTables("hfclrk"))
g.Groups.AddDef("大类")
g.Groups.AddDef("明细类")
g.Groups.AddDef("材料名称")
g.Totals.AddDef("成本数量")
g.Build()
Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("统计表1", "大类|明细类|材料名称","成本数量")
打开窗口后出现这样的提示:
去掉以上排序,即tv.BuildTree("统计表1", "大类|明细类|材料名称")就不会出错
下载信息 [文件大小: 下载次数: ] | |
![]() |
参见刚做好的例子
呵呵,我还以为有不管, 特地等到周末处理,原来是你代码错误:
tv.BuildTree("统计表1", "大类|明细类|材料名称","成本数量")
应该:
tv.BuildTree("统计表1", "大类|明细类|材料名称")
按照帮助的介绍,我的代码并没有错,引用帮助中的文件:
根据多列内容生成目录树
目录树有一个BuildTree方法,可以根据指定的数据表内容生成目录树节点。
语法:
BuildTree(DataTableName, Columns, Filter, Sort)
或
BuildTree(DataTable, Columns, Filter, Sort)
那就是说为了排序,我可以加上一个排序的列名呀。
排序参数是第四个,你放在第三的位置,等于就是Filter参数啊,应该这样。
tv.BuildTree("统计表1", "大类|明细类|材料名称","", "大类|明细类|成本数量")
明白了。
谢谢!