以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130180)

--  作者:动检
--  发布时间:2019/1/15 11:35:00
--  统计代码问题

图片点击可在新窗口打开查看此主题相关图片如下:图二.png
图片点击可在新窗口打开查看
老师 图一所示为系统里面的数据表 图二为想要实现统计表
以 检测结果_M列为例子,想要统计出它所在州市的样品数量、样品阳性个数及样品阳性率,但是我只会仿照帮助里面写原表有的列的统计,表达式的不会写,代码如下。
老师能帮我补充一下,样品阳性个数(值、同比、环比)、样品阳性率(值、同比、环比)的代码吗?

样品个数(包括“+”,“—”):以州市大连为例,2018年5月份的M样品个数是3个,
阳性个数:以州市大连为例,2018年5月份的M阳性个数是3个,
阳性率: 阳性个数/样品个数*100%  那么大连2018年5月份的阳性率就是100%

图片点击可在新窗口打开查看此主题相关图片如下:图一.png
图片点击可在新窗口打开查看

Dim g As New GroupTableBuilder("统计表1", DataTables("禽流感"))
g.Groups.AddDef("检测日期", DateGroupEnum.Year,"年")
g.Groups.AddDef("检测日期", "月")
g.Groups.AddDef("样品所在地_州市", "州市名称")
g.Filter="检测结果_M = \'+\'"
g.Totals.AddDef("样品数量","","样品数量_值")
g.Totals.AddDef("阳性数量","","阳性数量_值")
g.Totals.AddDef("阳性率","","阳性率_值")

g.SamePeriodGrowth = True
g.CircleGrowth = True
g.Build()
MainTable = Tables("统计表1")

Forms("返回2").OpenTo("统计表1")

MainTable.Focus()

Tables("统计表1").Sort = "州市名称"

--  作者:有点甜
--  发布时间:2019/1/15 12:18:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/2305.htm

 


--  作者:动检
--  发布时间:2019/1/15 14:22:00
--  
谢谢甜老师 图片点击可在新窗口打开查看