以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何计算两个日期列之间的时段?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172473)

--  作者:jt20002000
--  发布时间:2021/10/14 10:37:00
--  如何计算两个日期列之间的时段?
用帮助里的例子无法把一个表里的两个日期列所有间隔月份计算出来!
--  作者:有点蓝
--  发布时间:2021/10/14 10:57:00
--  
用了哪个例子?写了什么代码
--  作者:jt20002000
--  发布时间:2021/10/14 11:09:00
--  
就是DateYMD(dt1,dt2,y,m,d)
Output.Show(y & 
"年" & m & "月" & d & "日")。但是不知道如何运用到两个列的计算里
--  作者:有点蓝
--  发布时间:2021/10/14 11:19:00
--  
到表格datacolchanged事件处理:http://www.foxtable.com/webhelp/topics/1452.htm

比如
Select Case e.DataCol.Name
    Case
 "开始日期",
"完成日期"
        
Dim dr As DataRow = e.DataRow
        
If dr.IsNull("开始日期"OrElse dr.IsNull("完成日期"Then
            dr(
"月数") = Nothing
        
Else
Dim y,m,d As Integer
Dim 
dt1 As Date = dr("开始日期")
Dim 
dt2 As Date = dr("完成日期")
DateYMD
(dt1,dt2,y,m,d)
            
Dim tp As TimeSpan =  - 
            dr(
"数") = y * 12 + m
        End
 
If
End
 Select