主题：[求助]关于日期时间的计算

我要计算工龄，如：2012年1月1日，入职时间是2000年3月1日，工龄是11年，这个表达式如何写。我的表其中有两个列，一列是入职时间，一列是当月时间，工龄要求精确到月，最好精确到日，然后取整数。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目267.table

顺便学习一下，看明白了。

谢谢你很快有了回复

我刚接触此表，是个菜鸟，我以为用表达式就行了，你发过来的我看不懂，不知你从那里编写的程进去，只在代码输出那看到。

我要求不是用系统时间减去入职时间，而是用指定的一个时间减入职时间得出的工龄。

一样简单的，如果初次结束，还不知道在什么地方写代码，建议你先不管要管这样的问题，先看帮助，首先看《使用指南》，看两三遍之后，再看《开发指南》，到时你会知道，这样的问题其实很简单。

Select Case e.DataCol.name
    Case "入职日期"
        If e.DataRow.IsNull("入职日期") Then
            e.DataRow("工龄") = Nothing
        Else
            Dim dt As Date = e.DataRow("入职日期")
            Dim ct As Date = e.DataRow("日期")
            Dim y As Integer = e.DataRow("日期").Year - dt.Year
            If(ct.Month>dt.Month)
                e.DataRow("工龄") = y
                Return
            End If
            If(ct.Month < dt.Month)
            y=y-1
            Else If(ct.Day < dt.Day)
            y=y-1
           
    End If
    e.DataRow("工龄") = y
End If
End Select

认真的看了三天才看懂