此主题相关图片如下:222.png
Dim dtb2 As New DataTableBuilder("责任部门总表")
dtb2.AddDef("类别百分比", Gettype(Double))
dtb2.AddDef("累计百分比", Gettype(Double))
dtb2.Build()
DataTables("责任部门总表").DataCols("类别百分比").SetFormat("0.00%")
DataTables("责任部门总表").DataCols("累计百分比").SetFormat("0.00%")
DataTables("投诉部门总表").DataCols("类别百分比").SetFormat("0.00%")
DataTables("投诉部门总表").DataCols("累计百分比").SetFormat("0.00%")
DataTables("责任部门总表").save()
DataTables("投诉部门总表").save()
Tables("客户投诉修改_Table32").datasource = DataTables("责任部门总表")
Tables("客户投诉修改_Table33").datasource = DataTables("投诉部门总表")
Tables("客户投诉修改_Table34").datasource = DataTables("责任部门总表")
Tables("客户投诉修改_Table01").datasource = DataTables("投诉部门总表")
'DataTables("客户投诉修改_Table34").DataCols("类别百分比").SetFormat("0.00%")
'DataTables("客户投诉修改_Table01").DataCols("累计百分比").SetFormat("0.00%")
表格依旧不是百分比格式,最下面两句话用上去报错
此主题相关图片如下:111.png
此主题相关图片如下:222.png