Set rs = con.Execute("select distinct gys ,name from xsb ,gysbh where gys=code and rq>= '" & Trim(dp1.Value) & "' and rq<='" & Trim(dp2.Value) & "'") 该句作用是找现出日期在DTpicker 日期控件限定的范围内的记录RQ为数据中的日期型字段,DP1为 DTpicker 报错:数据类型不匹配 ,是哪里的错呢