以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  千分位显示问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124975)
--  作者：wangjx817
--  发布时间：2018/9/17 15:29:00
--  千分位显示问题

我在设计一个窗口的按钮的click事件时，编写了下述代码，但在工程造价列为什么不显示千分位。

Dim g As New GroupTableBuilder("统计表1", DataTables("工程汇总表"))
g.Groups.AddDef("施工单位")
g.Totals.AddDef("工程造价")
g.FromServer = True
g.VerticalTotal = True
g.Build()
For Each dc As DataCol In DataTables("统计表1").dataCols
    If dc.IsNumeric Then
        dc.setFormat("#,##0.00")
    End If
Next
Tables("工程分析_Table1").datasource = g.BuildDataSource
--  作者：有点甜
--  发布时间：2018/9/17 15:43:00
--  

Dim g As New GroupTableBuilder("统计表1", DataTables("工程汇总表"))
g.Groups.AddDef("施工单位")
g.Totals.AddDef("工程造价")
g.FromServer = True
g.VerticalTotal = True
Tables("工程分析_Table1").datasource = g.BuildDataSource

For Each dc As DataCol In DataTables("工程分析_Table1").dataCols
    If dc.IsNumeric Then
        dc.setFormat("#,##0.00")
    End If
Next
--  作者：wangjx817
--  发布时间：2018/9/17 15:49:00
--  
非常感谢，狐爸！