以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表中有个日期列和天数列,想要实现天数列=当前日期-日期列,代码报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81374)

--  作者:无我是天机
--  发布时间:2016/2/26 10:24:00
--  表中有个日期列和天数列,想要实现天数列=当前日期-日期列,代码报错
在表的DataColChanged事件中代码如下:
Select Case e.DataCol.Name 
    Case "ddate"
        Dim dr As DataRow = e.DataRow
        If dr("ddate") IsNot Nothing Then
            dr("tianshu") = CDate(dr("ddate") - Date.Today)
        End If
End Select



--  作者:大红袍
--  发布时间:2016/2/26 10:25:00
--  
dr("tianshu") = (CDate(dr("ddate")) - Date.Today).TotalDays
--  作者:大红袍
--  发布时间:2016/2/26 10:27:00
--  

http://www.foxtable.com/help/topics/1452.htm

 


--  作者:无我是天机
--  发布时间:2016/2/26 10:55:00
--  
好的,谢谢红袍老师。