标准表达式中数据类型不匹配,为什么?

Question

 If dtBegin > dtEnd Then MsgBox "起始日期不能大于终止日期，请重新选择！", vbInformation: Exit Sub
      Adodc1.RecordSource = "select * from Test_resolve where ReDate BETWEEN '" & dtBegin.Value & _
      "' AND '" & dtEnd.Value & "'"
      Set DataGrid1.DataSource = Adodc1

Answer 1

'数据库为SQL：
Adodc1.RecordSource = "select * from Test_resolve where ReDate BETWEEN '" & dtBegin.Value & _ 
      "' AND '" & dtEnd.Value & "'"
'数据库为ACCESS：
Adodc1.RecordSource = "select * from Test_resolve where ReDate BETWEEN #" & dtBegin.Value & _ 
      "# AND #" & dtEnd.Value & "#"