如何格式化临时表列数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

主要对临时表生成的列格式化数据，主要列底色为紫色区域需要格式化。

以下部分代码：

Dim bd4 As New SQLGroupTableBuilder("统计表4","分摊")

Dim dt4 As fxDataSource

bd4.Filter=Filter0

bd4.Groups.AddDef("日期",DateGroupEnum.none)

bd4.Totals.AddDef("人工成本") '需要保留一位小数

bd4.Totals.AddDef("费用")'需要保留一位小数

dt4 = bd4.BuildDataSource()

Dim nms As String() = {"日期"}

dt1.Combine(nms,dt2,nms)

dt1.Combine(nms,dt3,nms)

dt1.Combine(nms,dt4,nms)

Tables("YX公司_YX公司0").DataSource = dt1

With DataTables("YX公司_YX公司0").DataCols '用表达式列计算库存数据

.Add("X加V成本",Gettype(Single), "IIF([V量]=0,0,[现金]/ [V量])")'需要保留一位小数

.Add("X订单成本",Gettype(Single), "IIF([单数]=0,0,[现金]/[单数])")'需要保留一位小数

.Add("Y客单价",Gettype(Single), "IIF([单数]=0,0,[预算利润]/[单数])")'需要保留一位小数

.Add("成交率",Gettype(Single), "IIF([单数]=0,0,[单数]/[V量])")'需要保留一位小数的百分数

.Add("Y投资回报",Gettype(Single), "IIF([费用]=0,0,[预算利润]/[费用])")需要保留一位小数的百分数

.Add("出团率",Gettype(Single), "IIF([待出团]+[出团]=0,0,[出团]/([待出团]+[出团]))")需要保留一位小数的百分数

.Add("Y纯利",Gettype(Single), "IsNull([预算利润],0) - ISNULL([现金],0) - IsNull([预算利润],0)*0.2 - ISNULL([人工成本],0)")需要保留一位小数

End With

主题：如何格式化临时表列数据