主题：请教:DataList1显示的总计行仍会出现N个小数

直接在 部门分月工资表 最后增加一行合计就可以了，不需要在datalist中来合计吧～

在命令窗口测试 正常啊～     有谁能简化一下就好了
CurrentTable.AddNew()
currenttable.current("部门") = "合计"
currenttable.current("一月") = currenttable.Compute("Sum(一月)")
currenttable.current("二月") = currenttable.Compute("Sum(二月)")
currenttable.current("三月") = currenttable.Compute("Sum(三月)")
currenttable.current("四月") = currenttable.Compute("Sum(四月)")
currenttable.current("五月") = currenttable.Compute("Sum(五月)")
currenttable.current("六月") = currenttable.Compute("Sum(六月)")
currenttable.current("七月") = currenttable.Compute("Sum(七月)")
currenttable.current("八月") = currenttable.Compute("Sum(八月)")
currenttable.current("九月") = currenttable.Compute("Sum(九月)")
currenttable.current("十月") = currenttable.Compute("Sum(十月)")
currenttable.current("十一月") = currenttable.Compute("Sum(十一月)")
currenttable.current("十二月") = currenttable.Compute("Sum(十二月)")
currenttable.current("效益工资") = currenttable.Compute("Sum(效益工资)")   '原日期型改为双精
currenttable.current("年终奖") = currenttable.Compute("Sum(年终奖)")
currenttable.current("合计") = currenttable.Compute("Sum(合计)")  '字符型改为双精
forms("窗口1").open()
Dim dst As WinForm.DataList = Forms("窗口1").Controls("DataList1")
dst.DataTable = DataTables("部门分月工资表")
dst.Build()

看看动画吧：不会有N位的小数

此主题相关图片如下：xs.gif