以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 统计结果 元 换为 万元 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=150740) |
-- 作者:fubblyc -- 发布时间:2020/6/6 10:55:00 -- 统计结果 元 换为 万元 老师,统计 怎么把 元 换为 万元 Dim dt1 As fxDataSource Dim g1 As New SQLCrossTableBuilder("统计表2","日记账") g1.C g1.HGroups.AddDef("收或支2","收支类型") g1.HGroups.AddDef("业务类型2","业务类型") g1.VGroups.AddDef("卡号") g1.Totals.AddDef("收或支金额") 原始数据 单位 元,想让统计的结果显示 万元 ,移动端的 g1.HorizontalTotal = True \'水平汇总 g1.Filter = filter & " and 收或支金额 <> 0 " \'g1.Subtotal = True \'生成汇总模式 dt1 = g1.BuildDataSource() g1.Build Dim t As Table = Tables("统计表2") Dim dt As DataTable = t.DataTable |
-- 作者:有点蓝 -- 发布时间:2020/6/6 11:21:00 -- 参考:http://www.foxtable.com/mobilehelp/topics/0072.htm .AddCell(Format(r("收或支金额")/10000,"0.00")) |