专家坐堂-[求助]报表统计Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]报表统计  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193243)

--  作者：riyuan
--  发布时间：2024/8/29 10:45:00
--  [求助]报表统计

Dim b As New SQLGroupTableBuilder("统计表1", "党员信息表")
b.C
b.AddTable("党员信息表", "姓名", "性别", "党龄") \'添加统计表
b.Groups.AddDef("所属党组织")
b.Totals.AddDef("性别", AggregateENUM.Sum, "男")
b.Totals.AddDef("性别", AggregateENUM.Sum, "女")
b.Totals.AddExp("分布_10以下", "iif(党龄 < 10,1,0)")
b.Totals.AddExp("分布_10-20", "iif(党龄 >= 10 And 分数 < 20,1,0)")
\'b.Totals.AddExp("分布_70-80", "iif(分数 >= 70 And 分数 < 80,1,0)")
\'b.Totals.AddExp("分布_80-90", "iif(分数 >= 80 And 分数 < 90,1,0)")
\'b.Totals.AddExp("分布_90-100", "iif(分数 >= 90 And 分数 < 100,1,0)")
\'b.Totals.AddExp("分布_100-110", "iif(分数 >= 100 And 分数 < 110,1,0)")
\'b.Totals.AddExp("分布_110-120", "iif(分数 >= 110 And 分数 < 120,1,0)")
\'b.Totals.AddExp("分布_120-130", "iif(分数 >= 120 And 分数 < 130,1,0)")
\'b.Totals.AddExp("分布_130-140", "iif(分数 >= 130 And 分数 < 140,1,0)")
\'b.Totals.AddExp("分布_140以上", "iif(分数 >= 140,1,0)")
b.build()
MainTable = Tables("报表管理_table1")
为什么运行错误呢

--  作者：有点蓝
--  发布时间：2024/8/29 11:08:00
--

b.Totals.AddExp("男", "iif(性别 = \'男\',1,0)")

--  作者：riyuan
--  发布时间：2024/8/29 11:18:00
--
1、提示sql语句错误，无法继续统计
2、
此主题相关图片如下：比特截图2024-08-28-16-00-59.png

是什么原因，我是直接在窗体的after load事件中运行的

--  作者：有点蓝
--  发布时间：2024/8/29 11:21:00
--

b.AddTable("党员信息表") \'添加统计表

--  作者：riyuan
--  发布时间：2024/8/30 10:10:00
--

Dim b As New SQLGroupTableBuilder("统计表1", "党员信息表")
b.C
b.AddTable("党员信息表", "姓名", "性别", "党龄") \'添加统计表
b.Groups.AddDef("所属党组织")
b.Totals.AddDef("性别", AggregateENUM.Sum, "男")
b.Totals.AddDef("性别", AggregateENUM.Sum, "女")
b.Totals.AddExp("男", "iif(性别 = \'男\',1,0)")
b.Totals.AddExp("分布_10以下", "iif(党龄 < 10,1,0)")
b.Totals.AddExp("分布_10-20", "iif(党龄 >= 10 And 党龄 < 20,1,0)")
b.build()
MainTable = Tables("报表管理_table1")
为什么还是不行呢

[此贴子已经被作者于2024/8/30 10:10:22编辑过]

--  作者：有点蓝
--  发布时间：2024/8/30 10:19:00
--

Dim b As New SQLGroupTableBuilder("统计表1", "党员信息表")
b.C
b.AddTable("党员信息表") \'添加统计表
b.Groups.AddDef("所属党组织")
……

--  作者：riyuan
--  发布时间：2024/8/30 11:07:00
--

此主题相关图片如下：比特截图2024-08-28-16-00-59.png

是什么意思呢

--  作者：有点蓝
--  发布时间：2024/8/30 11:14:00
--
去掉b.AddTable这句代码

--  作者：riyuan
--  发布时间：2024/8/30 11:27:00
--

此主题相关图片如下：比特截图2024-08-28-16-00-59.png

此主题相关图片如下：2.png
这又是什么原因

--  作者：有点蓝
--  发布时间：2024/8/30 11:35:00
--

Dim b As New SQLGroupTableBuilder("统计表1", "党员信息表")
b.C
b.Groups.AddDef("所属党组织")
b.Totals.AddExp("男", "iif(性别 = \'男\',1,0)")
b.Totals.AddExp("分布_10以下", "iif(党龄 < 10,1,0)")
b.Totals.AddExp("分布_10-20", "iif(党龄 >= 10 And 党龄 < 20,1,0)")
b.build()