Foxtable(狐表)用户栏目专家坐堂 → [求助]为什么交叉统计出的值为翻倍


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

主题:[求助]为什么交叉统计出的值为翻倍

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


加好友 发短信
等级:一尾狐 帖子:480 积分:4464 威望:0 精华:0 注册:2014/3/4 21:20:00
[求助]为什么交叉统计出的值为翻倍  发帖心情 Post By:2020/7/9 15:38:00 [只看该作者]

用以下代码生成了交叉统计表,为什么所有值都是翻倍了。
我主要是想让表头一个格式转换成表头2的格式。


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

查询代码如下:
Dim tb As Table = Tables("单位成本_Table1")
Dim cb As WinForm.CheckedComboBox = e.Form.Controls("CheckedComboBox1")
Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
If cb.Value = "" Then
    MessageBox.Show("请选择年份!")
    Return
End If
Dim str As String = cb.Value.Replace(",","','")
Dim b As New SQLCrossTableBuilder("单位成本查询","单位成本")
b.ConnectionName = con_name
b.Filter = "年 in ( '" & str & "')" ' And 品名 Like '%" & txt.Value & "%'"
b.AddTable("单位成本","成品代号","产品信息","品号")
b.HGroups.AddDef("成品代号") '添加客户列用于水平分组
b.HGroups.AddDef("品名") '添加客户列用于水平分组
b.HGroups.AddDef("型号规格") '添加客户列用于水平分组
b.HGroups.AddDef("简称") '添加客户列用于水平分组
b.HGroups.AddDef("系列") '添加客户列用于水平分组
b.HGroups.AddDef("部件") '添加客户列用于水平分组
b.HGroups.AddDef("工艺类别") '添加客户列用于水平分组
b.VGroups.AddDef("年") '添加产品列用于垂直分组,并设置了Pattern参数
b.VGroups.AddDef("月") '添加产品列用于垂直分组,并设置了Pattern参数
b.Totals.AddDef("单位成本") '添加数量列用于统计

b.Build '生成统计表
tb.DataSource = b.BuildDataSource()

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


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/9 15:41:00 [只看该作者]

看不到数据无法判断。上传实例看看

 回到顶部