Function AgeInMonths(ByVal birthDate As Date) As Long
Return Microsoft.VisualBasic.DateDiff(Microsoft.VisualBasic.DateInterval.Month, birthDate, Date.Today)
End Function
Run Code Online (Sandbox Code Playgroud)
归档时间: |
|
查看次数: |
2955 次 |
最近记录: |