以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  代码不错误  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=113835)
--  作者：裴保民
--  发布时间：2018/1/23 22:16:00
--  代码不错误

在表的DataColChanged事件中写了如下代码，保存时出错


Dim ts As Date= Date.Today
Select Case e.DataCol.Name
    Case "还款日"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("还款日") Then
            dr("还款天数") = Nothing
        Else
           Dim tp As TimeSpan = Date.Today - dr("还款日") 
            dr("还款天数") = tp.TotalDays
        End If
End Select

这句代码哪错了？怎么不能保存呢？
[此贴子已经被作者于2018/1/23 22:17:32编辑过]
--  作者：有点蓝
--  发布时间：2018/1/23 22:24:00
--  
Dim tp As TimeSpan = Date.Today - cdate(dr("还款日") )
--  作者：有点甜
--  发布时间：2018/1/24 8:56:00
--  

你逻辑本身就有问题啊。

 

还款日和还款天数两者只需要一个值。有了还款日，就不需要还款天数，有了还款天数，就不需要还款日啊。