以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  SQLGroupTableBuilder 问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46198)
--  作者：fubblyc
--  发布时间：2014/2/18 22:01:00
--  SQLGroupTableBuilder 问题

请问各位老师：



Dim g As New SQLGroupTableBuilder("统计表2", "VIP消费信息")

g.C ’（数据源被屏蔽，这个没关系）

g.Groups.AddDef("购买日期", DateGroupEnum.Year, "年")

g.Groups.AddDef("购买日期", "月")

g.Groups.AddDef("门市专柜编号")

g.Totals.AddDef("实收金额", "", "VIP销售额_值")

g.Totals.AddDef("数量", "", "VIP销售件数_值")

g.Totals.AddDef("件单价",。。。) \'在此行我想统计 件单价（公式：件单价=VIP销售额/VIP销售额件数）  但是不懂得怎么写。。。。

g.SamePeriodGrowth = True

g.CircleGrowth = True

g.GrandProportion= True

g.Build()

Tables("经营成果分析_经营成果分析").DataSource = g.BuildDataSource()

[此贴子已经被作者于2014-2-18 22:04:24编辑过]
--  作者：有点甜
--  发布时间：2014/2/18 22:06:00
--  
这样写

g.Totals.AddExp("件单价","实收金额 / 数量")
--  作者：fubblyc
--  发布时间：2014/2/18 22:18:00
--  
有点甜老师，你看：

Dim g As New SQLGroupTableBuilder("统计表2", "VIP消费信息")
g.C
g.Groups.AddDef("购买日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("购买日期", "月")
g.Groups.AddDef("门市专柜编号")
g.Totals.AddDef("实收金额", "", "VIP销售额_值")
g.Totals.AddDef("数量", "", "VIP销售件数_值")
g.Totals.AddExp("件单价","实收金额/数量")
g.SamePeriodGrowth = True
g.CircleGrowth = True
g.GrandProportion= True
g.Build()
Tables("经营成果分析_经营成果分析").DataSource = g.BuildDataSource()

保存后 点击 应用窗口

出现：

错误代码位置：窗口，经营成果分析，AfterLoad   (就是这段代码所在位置)
无法完成延迟准备
无法预定义语句
列名‘件单价’无效

是什么情况呢？
--  作者：fubblyc
--  发布时间：2014/2/18 22:21:00
--  
有点甜老师：

件单价（公式：件单价=VIP销售额/VIP销售额件数）

而VIP销售额= 实收金额  的求和值    VIP销售件数= 数量  的求和值     

因而是不是不能直接"件单价","实收金额/数量"呢？
--  作者：有点甜
--  发布时间：2014/2/18 22:29:00
--  
 哦，那你就最后动态添加一个表达式列吧。

Dim g As New SQLGroupTableBuilder("统计表2", "VIP消费信息")
g.C \'(数据源被屏蔽,这个没关系)
g.Groups.AddDef("购买日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("购买日期", "月")
g.Groups.AddDef("门市专柜编号")
g.Totals.AddDef("实收金额", "VIP销售额_值")
g.Totals.AddDef("数量", "VIP销售件数_值")
g.SamePeriodGrowth = True
g.CircleGrowth = True
g.GrandProportion= True
g.Build()
Tables("经营成果分析_经营成果分析").DataSource = g.BuildDataSource()
Tables("经营成果分析_经营成果分析").DataTable.DataCols.Add("件单价", Gettype(Integer), "VIP销售额_值/VIP销售额件数_值")
[此贴子已经被作者于2014-2-18 22:31:46编辑过]
--  作者：fubblyc
--  发布时间：2014/2/18 22:49:00
--  
谢谢有点甜老师！！！！可以了！！！