以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期提醒问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184705)

--  作者:lgz518
--  发布时间:2022/12/23 22:26:00
--  日期提醒问题
If e.DataCol.Name = "实际归还日期" Then \'

    If e.NewValue Is Nothing Then
        e.DataRow("归还准时情况") = Nothing
   
    ElseIf e.NewValue > e.DataRow("预计归还日期") Then 
        e.DataRow("归还准时情况") = ("延误")
        
    ElseIf e.NewValue < e.DataRow("预计归还日期") Then 
        e.DataRow("归还准时情况") = ("提前") 
    Else
        e.DataRow("预计归还日期") = ("准时") \'

    End If
End If

需求:如果实际归还日期大于预计归还日期,归还准时情况为“延误”,如果实际归还日期小于预计归还日期,归还准时情况为“提前”,否则,准时


上面报错提示:.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:表,文件借阅, DataColChanged
详细错误信息:
调用的目标发生了异常。
从字符串“准时”到类型“Date”的转换无效。

--  作者:有点蓝
--  发布时间:2022/12/24 9:02:00
--  
列名写错了
    ElseIf e.NewValue < e.DataRow("预计归还日期") Then 
        e.DataRow("归还准时情况") = ("提前") 
    Else
        e.DataRow("预计归还日期") = ("准时") \'

    End If

另外空值的判断建议看看:http://www.foxtable.com/webhelp/topics/1470.htm