-- 作者:石四
-- 发布时间:2016/2/21 15:10:00
-- [求助]此路不通,求助
Dim sjs As Double = e.Form.Controls("TextBox2").Value With DataTables("工资核算_Table1").DataCols \'用表达式列计算库存数据 .Add("结算考勤",Gettype(Double), "IIF((IsNull([出勤],0) + IsNull([加班],0) + ISNULL([上月调休结余],0))>= sjs,sjs,IsNull([出勤],0) + IsNull([加班],0) + ISNULL([上月调休结余],0))") End With
此主题相关图片如下:qq截图20160221145929.png
以上代码,如果将sjs换为一明确数值,比如23,可以执行。
但是窗口中“TextBox2”的值是变化的,如何才能实现以上动态计算?
|
-- 作者:大红袍
-- 发布时间:2016/2/21 16:01:00
--
如果要动态设置表达式,这样写
.Add("结算考勤",Gettype(Double), "IIF((IsNull([出勤],0) + IsNull([加班],0) + ISNULL([上月调休结余],0))>= " & sjs & "," & sjs & ",IsNull([出勤],0) + IsNull([加班],0) + ISNULL([上月调休结余],0))")
|