主题：[求助]工龄如何计算到年月

现在根据参加工作时间只能将工龄计算到年，代码是

If e.DataCol.Name = "参加工作时间" Then
    If e.DataRow.IsNull("参加工作时间") Then '如果没有输入参加工作时间
        e.DataRow("工龄") = Nothing '则清空工龄
    Else
        '否则计算工龄
        e.DataRow("工龄") = Date.Today.Year - e.DataRow("参加工作时间").Year
    End If
End If

请问如何实际工龄为　*年*月