VB.Net通过身份证号计算生日的方法
VB.Net通过身份证号计算生日的方法
是不是得先转为农历的生日，再看今年农历那天的阳历是多少号

[解决办法]
身份证中的生日是阳历的，不用再转换了，取出来直接用就行。
第二代身份是18位的，前6位是省市区的标识，从第7位开始就是8位的生日，格式是YYYYMMDD。
可以用String的SubString函数取就可以了。

[解决办法]

VB.NET code

Private Shared Function GetBirthday(ByVal id As String) As String    Dim birthday As Integer    If String.IsNullOrEmpty(id) = True Then        Return ""    End If    If id.Length <> 18 Then        Return ""    End If    birthday = id.Substring(6, 8)    Return birthdayEnd Function