Foxtable(狐表)用户栏目专家坐堂 → 求助:报表中怎么写代码计算自增人数=出生人数-死亡人数


  共有9263人关注过本帖树形打印复制链接

主题:求助:报表中怎么写代码计算自增人数=出生人数-死亡人数

帅哥哟,离线,有人找我吗?
lrh9537
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:327 积分:2825 威望:0 精华:0 注册:2012/11/16 12:19:00
求助:报表中怎么写代码计算自增人数=出生人数-死亡人数  发帖心情 Post By:2012/11/23 8:46:00 [只看该作者]


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

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/23 8:49:00 [只看该作者]

 把自增人数改成表达式列,然后编写表达式。

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

 回到顶部
帅哥哟,离线,有人找我吗?
lrh9537
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:327 积分:2825 威望:0 精华:0 注册:2012/11/16 12:19:00
  发帖心情 Post By:2012/11/23 9:20:00 [只看该作者]

还是不会写,请老师指教


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/23 9:23:00 [只看该作者]

 增加一个表达式列,然后写表达式

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

 回到顶部
帅哥哟,离线,有人找我吗?
lrh9537
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:327 积分:2825 威望:0 精华:0 注册:2012/11/16 12:19:00
  发帖心情 Post By:2012/11/23 9:56:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:命名.jpg
图片点击可在新窗口打开查看
计算成功了。谢谢,但是怎么写进编码里自动生成,不是增加一个表达式列来解决呢?

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/23 10:13:00 [只看该作者]

 在

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

 后面加入

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

 回到顶部
帅哥哟,离线,有人找我吗?
lrh9537
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:327 积分:2825 威望:0 精华:0 注册:2012/11/16 12:19:00
  发帖心情 Post By:2012/11/23 10:24:00 [只看该作者]

谢谢,终于搞成了

让我学了不少 

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By: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)")

 回到顶部