利用什么条件可以得出查询表中规定日期的内容

gemeng　发表于：2013-05-05 10:19:44 　

复制

1. 我附件表中，每天记录每个员工的绩效评分，因为影响到薪水，所以会在每个月14日提交评分报告（即例如：4/14/2013提交的报告是3/14/2013至4/13/2013这个日期一个月的内容）

在查询表中需要什么样的条件才能得到这样的效果？

例如：当天日期为4/28/2013时，查询表显示的内容是：4/14/2013-4/28/2013 之间的内容；

当天日期为5/5/2013时，查询表显示的内容时：4/14/2013-5/5/2013之间的内容；

直至5/13/2013结束，重新显示5/14/2013之后的内容

附件：附件

Top

煮江品茶发表于：2013-05-05 11:34:23

假设有一个文本框控件名曰：查询日期，则:

sub 查询(byval frm as form)
   dim strwh as string
   dim date0 as date,date1 as date
   if isDate(me.查询日期.value)=false then exit sub
   date1=me.查询日期.value
   if day(date1)<=14 then
       date0=DateSerial(year(date1),month(date1)-1,14)
   else
       date0=DateSerial(year(date1),month(date1),14)
   end if
   frm.filter="日期>=#" & date0 & "# And 日期<=#" & date1 & "#"
   frm.filteron=true
end sub

Top

gemeng 发表于：2013-05-05 16:15:48

谢谢煮江品茶老师的帮助

可能是我描述不太清楚，我要的效果不是那么复杂，

我刚才改了一下查询条件，不知道对不对，老师们帮忙确认一下，或有什么更简单一点方法；

附件：修改附件

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

利用什么条件可以得出查询表中规定日期的内容