CDate(Format(CInt(Me.TextBox1.Text), "0000/00/00"))


Microsoft MVP
Microsoft MVP ASP/ASP.NET


topcat
Blog:http://www.dotblogs.com.tw/topcat