以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个代码如何生效呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9056)

--  作者:yuemiao816
--  发布时间:2011/1/24 15:42:00
--  这个代码如何生效呢?

房补=-int(-(e.DataRow("基本工资_岗位工资") + e.DataRow("基本工资_薪级") + e.DataRow("基本工资_教护10%")) *0.13)

 

我想让房补列按照以上的计算得出结果后,除非能整除,否则不管小数是几都往上进一位,不知道这么写的计算方式对不对,另外这个代码怎么可以起作用呢?我用e.DataRow("房补")=-int(-(e.DataRow("基本工资_岗位工资") + e.DataRow("基本工资_薪级") + e.DataRow("基本工资_教护10%")) *0.13),直接放表属性里,不管用呀~



--  作者:狐狸爸爸
--  发布时间:2011/1/24 15:48:00
--  
没看懂你的意思,做个表传上来看看。
--  作者:yuemiao816
--  发布时间:2011/1/24 16:18:00
--  这个例子!
是想要住房补贴=(岗位工资+薪级工资+护理岗位)*0.13   以下面这个例子住房补贴列应该等于18.1,余出了0.1,如何能让小数往上进一位,18.1变成19呢?不是四舍五入,是只要有小数就进一位,只保留整数!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:例子.table


--  作者:狐狸爸爸
--  发布时间:2011/1/24 16:27:00
--  

这里有很多数学函数,请参考:

 

http://help.foxtable.com/topics/1440.htm

 

你的代码:

 

 

Select Case e.DataCol.Name
    Case "岗位工资","薪级工资","护理岗位"
        Dim r As DataRow = e.DataRow
        Dim v As Double = r("岗位工资") + r("薪级工资") + r("护理岗位")
        r("住房补贴") = math.Ceiling(v)
End Select