以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  为什么我用帮助里面的代码不对  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=146389)

--  作者:profit
--  发布时间:2020/2/22 17:58:00
--  为什么我用帮助里面的代码不对

Select Case e.DataCol.Name
Case
"生产日期","保质天数"
If e.DataRow.IsNull("生产日期") Then
e.
DataRow("到期日期") = Nothing
Else

e.
DataRow("到期日期") = e.DataRow("生产日期").AddDays(e.DataRow("保质天数"))
End
If
End
Select


我用了这段代码,但是只要输入生产日期,保质天数还没输入到期日期就是显示了生产日期,这是怎么的?


--  作者:程兴刚
--  发布时间:2020/2/22 18:12:00
--  
Select Case e.DataCol.Name
    Case "生产日期","保质天数"
        If e.DataRow.IsNull("生产日期") OrElse e.DataRow.IsNull("保质天数") Then
            e.DataRow("到期日期") = Nothing
        Else
            e.DataRow("到期日期") = e.DataRow("生产日期").AddDays(e.DataRow("保质天数"))
        End If
End Select