通过条件从SQL后台加载满足条件的数据,然后将数据进行汇总统计,为何小计处精度太高,应该如何保留二位小数呢,没有发现参数,请指点~
此主题相关图片如下：cuowu.png
Tables(e.Form.Name & "_table1").DataTable.LoadFilter= Vars("filter")
Tables(e.Form.Name & "_table1").DataTable.load
Dim t As Table = Tables(e.Form.Name & "_table1")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = True
t.SpillNode = True
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "业务日期"
g.TotalOn = "支出,收入,毛利"
g.Caption = "{0}月 小计"
g.DateGroup = DateGroupEnum.Month
t.SubtotalGroups.Add(g)
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "业务日期"
g.TotalOn = "支出,收入,毛利"
g.Caption = "{0}年 小计"
g.DateGroup = DateGroupEnum.Year
t.SubtotalGroups.Add(g)
t.Subtotal()
加好友 
发短信
Post By：2015/5/14 23:19:00 [显示全部帖子]
