求高手写一段VB.NET的语言~~~~~~~~~~~

我们老师要求我们写一段关于输身份证号码的窗体软件
内容是一个LABEL,一个TEXT,一个BUTTOM
在TEXT中输入身份证号,非15非18位报错("输入的位数不对")
15位中包含字母报错
18位中只能包含X且要在最后一位,否则报错
生日中月不能超过12,日不能超过31,否则报错
最后按BUTTOM 弹出输入的身份证的生日年月日~~~~

 求高手啊~~~~~谢谢啦~~~~~~~~~

补充：是运用字符串函数
像 instr  mid  len  replace  
和 isnumeric()

答案：select * from 表 where year(ruzishijian)

上一个：VB.net 有委托运算符 AddressOf C# 为什么没有？ 该怎么写？
下一个：C#或VB.NET,form1.controls(0)就是一个Textbox，为什么不能这样form1.controls(0).text="value"?