以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]计算求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=143136)
--  作者：miaoqingqing
--  发布时间：2019/11/14 15:07:00
--  [求助]计算求助
 第一列值，小于等于10时，第三列等于第二列值
第一列值，超过20，小于30时，第三列等于第二列值+0.2
第一列值，超过30，小于40时，第三列等于第二列值+0.4
也就是，第一列每增加10，都增加0.2

计算，求助
--  作者：有点蓝
--  发布时间：2019/11/14 15:22:00
--  
datacolchanged事件，大概这样

If e.DataCol.name = "第一列"
    If e.newvalue <= 10 Then
        e.DataRow("第三列") = e.DataRow("第二列")
    Else
        Dim i As Integer = math.Ceiling((e.newvalue-20) / 10)
        e.DataRow("第三列") = e.DataRow("第二列") + 0.2 * i
    End If
End If