Foxtable(狐表)用户栏目专家坐堂 → 交?统计问题


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

主题:交?统计问题

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/6 14:18:00 [显示全部帖子]

先生成统计表,再使用DataTables("统计表1").DataCols.Add这种方式添加表达式列,类似:http://www.foxtable.com/webhelp/topics/3227.htm

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/6 15:40:00 [显示全部帖子]

……
b.Build '生成统计表
dim s as string = ""
for each c as col in Tables("统计表1").cols
if c.name like "数量_*" then
s = s & "+" & c.name
next
s = s.trim("+")
DataTables("统计表1").DataCols.Add("数量小计", GetType(Double), s)
DataTables("统计表1").DataCols.Add("超差数", GetType(Double), "数量小计 - 计划运动量")

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 10:42:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 12:02:00 [显示全部帖子]

什么地方没有值?截图说明

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 13:46:00 [显示全部帖子]

问题1、看6楼
2、请上传实例测试

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 14:44:00 [显示全部帖子]

使用b.Build 才能生成统计表1,如果绑定了窗口表,要使用窗口表引用

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 15:00:00 [显示全部帖子]

先绑定窗口表,在使用这个窗口表

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 15:55:00 [显示全部帖子]

……
b.Totals.AddDef("日运动量") 
Tables("窗口2_Table1").DataSource = b.BuildDataSource()先绑定窗口表
所有其它要对表格的处理放在这之后

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


加好友 发短信
等级:超级版主 帖子:111657 积分:568409 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 16:50:00 [显示全部帖子]

很简单的语法啊

dim ss() as string = {"列A","列B"}
dim s1 as string =""
for each c as string in ss
s1 = s1 & "+" & c
next
msgbox(s1)

dim s2 as string =""
for each c as string in ss
s2 = s2 & "+ isnull(" & c & ",0)"
next
msgbox(s2)

 回到顶部