1、msgbox(flt) 看弹出些什么。
2、日期的筛选不要用单引号,要用#号。如 flt = flt & "(日期 >= #" & d1 & "# And 日期 <= #" & d2 & "#)"