字串轉日期

參考 
--
在pos,erp,進銷存等系統內
都習慣使用8碼為日期,如:20120111
這樣的話,在ap 內是不允許的;可在sql是沒問題的
當使用T-sql 時,就必須將此轉換為日期格式
如下:
 Dim aa As Date
Dim s As String = Date.ParseExact(TextBox1.Text, "yyyyMMdd", Nothing)
If IsDate(s) Then
   aa = s
   MsgBox("Y")
Else
   MsgBox("N")
End If