以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:报表中怎么写代码计算自增人数=出生人数-死亡人数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26050)

--  作者:lrh9537
--  发布时间:2012/11/23 8:46:00
--  求助:报表中怎么写代码计算自增人数=出生人数-死亡人数

图片点击可在新窗口打开查看此主题相关图片如下:未命名12.jpg
图片点击可在新窗口打开查看

--  作者:lin_hailun
--  发布时间:2012/11/23 8:49:00
--  
 把自增人数改成表达式列,然后编写表达式。

http://www.foxtable.com/help/topics/0104.htm
[此贴子已经被作者于2012-11-23 8:48:41编辑过]

--  作者:lrh9537
--  发布时间:2012/11/23 9:20:00
--  

还是不会写,请老师指教


--  作者:lin_hailun
--  发布时间:2012/11/23 9:23:00
--  
 增加一个表达式列,然后写表达式

 [.....总数] - [死亡人数]

--  作者:lrh9537
--  发布时间:2012/11/23 9:56:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:命名.jpg
图片点击可在新窗口打开查看
计算成功了。谢谢,但是怎么写进编码里自动生成,不是增加一个表达式列来解决呢?
--  作者:lin_hailun
--  发布时间:2012/11/23 10:13:00
--  
 在

 r("....................死亡人数") = Tables().Compute("...............................")

 后面加入

 r("自增人数") = r("死亡人数") - r("............总数")

--  作者:lrh9537
--  发布时间:2012/11/23 10:24:00
--  

谢谢,终于搞成了

让我学了不少 

还有一点昨天没整成,就是在最后增加一行汇总数字怎么写代码

[此贴子已经被作者于2012-11-23 10:25:11编辑过]

--  作者:lin_hailun
--  发布时间:2012/11/23 10:32:00
--  
 代码写在Next后面

 dim nr as row = MainTable.AddNew

 nr("........总数") = MaintTalbe.Compute("Sum(........总数)")
 nr("XXX") = MaintTalbe.Compute("Sum(XXX)")
 nr("XXX") = MaintTalbe.Compute("Sum(XXX)")