想定义时段过滤条件:
当年
t.Filter = " > = #" & Date.Now().Year & "-01-01" & "# And " < = #" & Date.Now() & "#"
说明:
‘此代码取出系统当前日期所属年份,从1月1日起开始计时。
Date.Now().Year & "-01-01"
’取当前日期
Date.Now()
当月
t.Filter = & " > = #" & Format(Date.Now(),"y") & "# And "< = #" & Date.Now() & "#"
实际执行过程中出错,请高手指点