Foxtable(狐表)用户栏目专家坐堂 → [求助]代码生成统计表出错(除数为0)(已解决)


  共有12089人关注过本帖平板打印复制链接

主题:[求助]代码生成统计表出错(除数为0)(已解决)

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


加好友 发短信
等级:七尾狐 帖子:1525 积分:10580 威望:0 精华:0 注册:2008/9/24 11:16:00
[求助]代码生成统计表出错(除数为0)(已解决)  发帖心情 Post By:2011/6/25 15:34:00 [只看该作者]

在代码生成的统计表添加一列表达式统计列:计算人均加工费

Dim b As New SQLGroupTableBuilder("统计表1","日报源表")
b.Groups.AddDef("日期", DateGroupEnum.None) '添加日期列用于分组
b.Groups.AddDef("单位") '根据单位分组
b.Totals.AddDef("加工费") '添加加工费列用于统计
b.Totals.AddDef("投工") '添加投工列用于统计
b.Totals.AddExp("人均","[加工费]/[投工]")'添加人均列用于计算人均加工费
b.Build '生成统计表
MainTable = Tables("统计表1") '打开生成的统计表
With Tables("统计表1")
    .Position = .Rows.Count - 1
End With

运行出错,如何修改代码,解决除数为0的出错。

 

 


图片点击可在新窗口打开查看此主题相关图片如下:a.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2011-6-25 22:43:50编辑过]

 回到顶部