Dim ds As New DataSet '判斷欄位是否存在 If ds.Tables(0).Columns.Contains("欄位名稱") = True Then End If '判斷欄位是否有值 If IsDBNull(ds.Tables(0).Rows(0).Item("欄位名稱")) Then End If '判斷是否日期格式 If IsDate(ds.Tables(0).Rows(0).Item("欄位名稱")) Then End If
參考:http://www.dotblogs.com.tw/joysdw12/archive/2010/11/25/19725.aspx