以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  设置临时列为百分数格式没有生效,老师看看什么情况吧  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114923)

--  作者:guosheng
--  发布时间:2018/2/26 13:05:00
--  设置临时列为百分数格式没有生效,老师看看什么情况吧
    ……

DataTables("月度资金计划执行部门分析").DataCols.Add("偏差率", Gettype(Double))   \'增加临时列
    For Each dr2 As DataRow In DataTables("月度资金计划执行部门分析").DataRows
        If dr2("计划付款金额")=0 And  dr2("支付金额")>0
            dr2("偏差率")=2
        Else
            dr2("偏差率")=dr2("偏差绝对值")/dr2("计划付款金额")
        End If
    Next
    DataTables("月度资金计划执行部门分析").DataCols("偏差率").SetFormat("0.00%")
    
    Tables("月度资金计划偏差分析_Table2").DataSource = DataTables("月度资金计划执行部门分析")


--  作者:有点甜
--  发布时间:2018/2/26 14:43:00
--  

改成

 

   
    Tables("月度资金计划偏差分析_Table2").DataSource = DataTables("月度资金计划执行部门分析")

    Tables("月度资金计划执行部门分析").DataTable.DataCols("偏差率").SetFormat("0.00%")