以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]数量为零如何不统计  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160966)

--  作者:xuxd76
--  发布时间:2021/2/27 20:41:00
--  [求助]数量为零如何不统计

图片点击可在新窗口打开查看此主题相关图片如下:数量为零如何能不统计.png
图片点击可在新窗口打开查看


Dim d1 As Date = e.Form.Controls("统计开始日期").Value
Dim d2 As Date = e.Form.Controls("统计结束日期").Value
Dim d3 As Date = e.Form.Controls("年度期初").Value
Dim d4 As Date = e.Form.Controls("上年年末").Value


If d1 = Nothing Or d2 = Nothing Then
    MessageBox.Show("起始或结束日期都不能为空!","友情提醒",MessageBoxButtons.OK,MessageBoxIcon.Warning)
End If

Dim g1 As New GroupTableBuilder("月度统计", DataTables("业务表"))  \'客户查询 为Click按钮名称
g1.Filter = "日期<=#" & d2 & "# and 未报数量 <> 0 "\'"

Dim bb1 As fxDataSource
g1.Groups.AddDef("员工姓名")
g1.Groups.AddDef("礼品类别")
g1.Groups.AddDef("领而未报")
g1.Totals.AddDef("未报数量")
g1.VerticalTotal = True
g1.SubTotal = True
g1.Decimals = 2
g1.FromServer = True
g1.Build()
bb1 = g1.BuildDataSource()


Tables("业务管理_统计表").DataSource = g1.BuildDataSource()
e.Form.Controls("统计表").Visible = True

Tables("业务管理_统计表").cols("未报数量").DataCol.setFormat("#,###.0")

Tables("业务管理_统计表").SetColVisibleWidth("员工姓名|80|礼品类别|80|领而未报|80|未报数量|80")

代码为上面,仅是汇总统计,现在需要把零值的不统计在内,通实现吗?

--  作者:有点蓝
--  发布时间:2021/2/28 20:43:00
--  
自己不是设置里条件了么?如果要包括0就不要设置这个条件

g1.Filter = "日期<=#" & d2 & "# and 未报数量 <> 0 "