Question

VB中查询access中一段日期内的记录

Private Sub Command6_Click() day1 = InputBox("输入起始日期(YYYY/MM/DD)") day2 = InputBox("输入截止日期(YYYY/MM/DD)") If day1 <> "" Then sqlstr = "select * from 财务表 where 日期 '> = " & Format(dt.Value, "day1 ") & " and '<= " & Format(dt1.Value, "day2") & " " MsgBox sqlstr Data1.RecordSource = sqlstr Data1.Refresh 这样写为什么总是需要调试 怎么可以正常查询？

Answer 1

那是因为你的sql查询语句有误： 参照如下更改吧： select * from 财务表 where 日期 between '2002-06-01' and '2003-06-1'

希望采纳