以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求数学公式代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84254)

--  作者:woshiabc
--  发布时间:2016/4/26 17:40:00
--  求数学公式代码


图片点击可在新窗口打开查看此主题相关图片如下:e)t$0_61du4m`rj6b2bb@2f.png
图片点击可在新窗口打开查看

上面选中铜版,则执行如下计算:

如果W<38cm,则用ceiling(W/38)*W,(向上取整),否则按录入的算

(L+Lip)<40CM,则用50CM算,否则用ceiling(((L+Lip)+8)/5)*5算

最后结果为W*(L+Lip)


--  作者:大红袍
--  发布时间:2016/4/26 17:42:00
--  
 上传具体例子,计算哪一行,计算结果放到哪里去。
--  作者:woshiabc
--  发布时间:2016/4/27 11:25:00
--  
也是表的其中一个字段名叫铜板,截图没截出来
--  作者:woshiabc
--  发布时间:2016/4/27 11:29:00
--  
结果在表中显示,这表是一个窗体,里面放了分区面板
--  作者:大红袍
--  发布时间:2016/4/27 11:30:00
--  

类似代码,如DataColChanged事件,不会做的上传实例。

 

If e.DataCol.Name = "铜板" AndAlso e.NewValue = True Then
   
    If e.DataRow("W") < 38 Then
        e.DataRow("结果") = Math.ceiling(e.DataRow("W")/38)*e.DataRow("W")
    Else
        e.DataRow("结果") = e.DataRow("W")
    End If
   
End If