以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  千分位显示问题  (http://www.foxtable.com/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
--  
非常感谢,狐爸!