以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]保留一位小数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1661)

--  作者：shihao821004 --  发布时间：2009/1/19 16:48:00 --  [求助]保留一位小数 If e.DataCol.Name = "预产期" And e.Datarow.IsNull("预产期")  = False Then    Dim d1 As Date = CurrentTable.Current("预产期")    Dim d2 As Date = Date.Today    Dim ts As TimeSpan = d2 - d1   Math.Round ((e.datarow("宝宝月龄") = ts.Days /30),1) End If 涂红的地方有问题，请老师帮看一下 我想根据算出的日期除30天，再保留一位小数。 总之就是要把计算结果由天转换为月。

--  作者：czy --  发布时间：2009/1/19 16:55:00 --   这样试试： e.datarow("宝宝月龄") = Math.Round(ts.Days /30),1)

--  作者：狐狸爸爸 --  发布时间：2009/1/19 16:57:00 --   呵呵，这一句代码简直错得离谱了。 e.datarow("宝宝月龄")  = Math.Round(ts.days/30,1)

--  作者：shihao821004 --  发布时间：2009/1/20 9:30:00 --   让您见笑了，感谢二位的耐心解答。 另外，您给的公式少了一个小括号，嘻嘻 e.datarow("宝宝月龄")  = Math.Round((ts.days/30,1)