专家坐堂-小数点设置问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  小数点设置问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72743)

--  作者：douglas738888
--  发布时间：2015/8/5 15:03:00
--  小数点设置问题

以下代码是动态生成TopicBar带统计数字显示的其中代码
Dim cnt7 As Integer = DataTables("订单").Compute("Sum(订单总价)","下单日期 >= #" & DateTime.Today & "# and 下单日期 < #" & DateTime.Today.AddDays(1) & "#")
请教老师，如何修改这条代码，让SUM统计后是666.53，而不是667

--  作者：有点蓝
--  发布时间：2015/8/5 15:11:00
--
Dim cnt7 As Integer = DataTables("订单").Compute("Sum(订单总价)","下单日期 >= #" & DateTime.Today & "# and 下单日期 < #" & DateTime.Today.AddDays(1) & "#") * 100
Dim result As Double = cnt7/100
参考
http://www.foxtable.com/help/index.html?n=0108.htm

--  作者：大红袍
--  发布时间：2015/8/5 15:13:00
--
Dim cnt7 As Double = DataTables("订单").Compute("Sum(订单总价)","下单日期 >= #" & DateTime.Today & "# and 下单日期 < #" & DateTime.Today.AddDays(1) & "#")

--  作者：douglas738888
--  发布时间：2015/8/5 15:16:00
--
谢谢两位老师！！