以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何在两个年月日之间计算间隔几年几月几天  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189679)

--  作者:nmxmnxf
--  发布时间:2023/12/17 10:28:00
--  如何在两个年月日之间计算间隔几年几月几天
新学孤表,想计算一个日期间的间隔几年几月几天,如何设置和操作,请专家们指导。十分感谢。
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/12/17 20:31:00
--  
参考:http://www.foxtable.com/webhelp/topics/2648.htm

将该表的DataColChanged时间代码设置为:

Select Case e.DataCol.name
    Case "SYQX_Q","
SYQX_Z"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("
SYQX_Q"Or dr.IsNull("SYQX_Z"Then
           dr("YDNX") = Nothing
        Else
Dim y,m,d As Integer
Dim 
dt1 As Date = dr("SYQX_Q")
Dim 
dt2 As Date = dr("SYQX_Z")
DateYMD
(dt1,dt2,y,m,d)
            dr("
YDNX") = y & "年" & m & "月" & d & "日"
        End 
If

End
 Select


--  作者:nmxmnxf
--  发布时间:2023/12/18 9:11:00
--  
非常感谢!!!