以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100877)

--  作者:张子俊
--  发布时间:2017/5/20 8:11:00
--  代码

If e.DataCol.Name = "系数" Then
    If e.DataRow.IsNull("系数") Then
        e.DataRow("绩效工资") =e.DataRow("绩效标准工资")/e.DataRow("工数")*e.DataRow("实际工数")
Else
         e.DataRow("绩效工资") =e.DataRow("绩效标准工资")*e.DataRow("系数")
    End If
End If

这段代码为啥不起作用


--  作者:有点蓝
--  发布时间:2017/5/20 8:33:00
--  
Select Case e.DataCol.Name
    Case "系数","绩效标准工资","工数","实际工数"
        If e.DataRow.IsNull("系数") Then
            If e.DataRow.IsNull("工数") 
                e.DataRow("绩效工资") = Nothing
            Else
                e.DataRow("绩效工资") =e.DataRow("绩效标准工资")/e.DataRow("工数")*e.DataRow("实际工数")
            End If
        Else
            e.DataRow("绩效工资") =e.DataRow("绩效标准工资")*e.DataRow("系数")
        End If
End Select

重置一下列:
图片点击可在新窗口打开查看