- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]AFTERLOAD窗体中的代码，实现在加载树显示统计数据 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=105031)
-- 发布时间：2017/8/10 13:20:00
-- [求助]AFTERLOAD窗体中的代码，实现在加载树显示统计数据
AFTERLOAD窗体中的代码，用下面的代码（可实现在加载树显示统计数据），但却决说未将对象引用到实例。
Dim dt As DataTable
Dim b As New SQLGroupTableBuilder("统计表1","工资库")
b.Groups.AddDef("发薪年月",DateGroupEnum.Year,"年")
b.Groups.AddDef("发薪年月",DateGroupEnum.Month,"月")
b.Totals.AddDef("_Identify",AggregateEnum.Count,"人数")
dt = b.Build(True)
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月")
-- 发布时间：2017/8/10 13:24:00
--
- 请高手帮忙实现在加载树显示统计数据。
-- 发布时间：2017/8/10 14:41:00
--
参考
http://www.foxtable.com/webhelp/scr/2742.htm
不会做上传实例。
-- 发布时间：2017/8/11 16:59:00
--
实例已上传，请老师帮忙实现在加载树显示统计数据。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:工资.rar |
-- 发布时间：2017/8/11 17:20:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:工资.foxdb |
此主题相关图片如下：123456.png
-- 发布时间：2017/8/11 18:20:00
--
谢谢老师指点!
-- 发布时间：2017/8/11 18:23:00
--
再请问老师，如何点击某键刷新加载树。
-- 发布时间：2017/8/11 20:48:00
--
把窗口afterload的代码放到窗口/菜单按钮事件里调用
-- 发布时间：2017/8/12 14:39:00
--
谢谢老师指点，再问用5楼的实例，按月在EXCEL模板中打印数据，如何动态设置打印条件为当前月的日期（红色字体部分）。
Dim Book As New XLS.Book(ProjectPath & "Attachments\\其他人员月工资打印模板.xls") \'打开模板
Dim fl As String = ProjectPath & "Reports\\其他人员月工资打印模板.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(2,7).Value = "<发薪年月>" \'写入打印条件
Book.Build() \'生成报表
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()
-- 发布时间：2017/8/12 14:56:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:其他人员月工资打印模板.xls |
上传实例，请帮忙，谢谢！