| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何将结果在窗口上的文本框显示？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=164303) |
| -- 作者：lin98 -- 发布时间：2021/5/5 14:56:00 -- 如何将结果在窗口上的文本框显示？ 窗口上有以下的标签和文本框： 本月订单总单数: 文本框1; 本月订单总数量: 文本框2; 如何将统计在文本框？ Dim Filter As String Dim b As New GroupTableBuilder("统计表1",DataTables("订单")) b.Groups.AddDef("交货日期","月") b.Totals.AddDef("交货日期",AggregateEnum.Count,"订单数") b.Totals.AddDef("数量","订购数量") \'添加数量列用于统计 b.Filter = Filter Tables("分组加载统计_Table1").DataSource = b.BuildDataSource() |
| -- 作者：有点蓝 -- 发布时间：2021/5/5 15:00:00 -- Tables("分组加载统计_Table1").DataSource = b.BuildDataSource() if Tables("分组加载统计_Table1").rows.count > 0 then e.form.controls("文本框1").text = Tables("分组加载统计_Table1").rows(0)("订单数") end if
|