Data Type Mismatch in criteria expression

txtHideDailyIncomingReportDate.Text =
pickerDailyIncomingReport.Value

ReportAdapter1.SelectCommand.CommandText = _
"SELECT * FROM PaperRollTransaction WHERE " & _
"DateIn = '" & txtHideDailyIncomingReportDate.Text & "' "
Try
ReportAdapter1.Fill (ReportDataSet11)
Catch eReport As System.Data.OleDb.OleDbException
MessageBox.Show(eReport.Message)
End Try


Above code shows me a exception message "data type mismatch in criteria expression". I know there is an error in date data type, could anyone solve this problem for me?

thanks

If DateIn is a date type field then you need # around the value:

VB Code:

txtHideDailyIncomingReportDate.Text = pickerDailyIncomingReport.Value 
 
ReportAdapter1.SelectCommand.CommandText = _ 
"SELECT * FROM PaperRollTransaction WHERE " & _ 
"DateIn = #" & txtHideDailyIncomingReportDate.Text & "# " 
Try 
ReportAdapter1.Fill (ReportDataSet11) 
Catch eReport As System.Data.OleDb.OleDbException 
MessageBox.Show(eReport.Message) 
End Try