1、获取“年”范围变量
sDate=Format$(Date,"YYYY") & "-01-01 00:00:00"
eDate=Format$(Date,"YYYY") & "-12-31 23:59:59"
2、获取“月”范围变量
sDate=Format$(Date,"YYYY-MM") & "-01 00:00:00"
eDate=DateAdd("d",-1,Format$(Date,"YYYY") & "-" & Format$(Date,"MM")+1 & "-01") & " 23:59:59"
其它的SQL统计语句不用变化,只要把这两个变量替代就可以实现统计了.
本月的
strSql = "select sum(本次交款) as aaa from 收费明细 where 收费日期>= #" & format(a1,"yyyy-mm-01") & "# and 收费日期<#" & format(cdate(foramt(a1,'yyyy-mm-01"))+32,"yyyy-mm-01") & "#"
本年的
strSql = "select sum(本次交款) as aaa from 收费明细 where year(收费日期)=" & format(a1,"yyyy")