[已解决]请教：如何用查询得出两个给定日期之间的所有日期列表？

todaynew

function datelist(byval d1 as date,byval d2 as date) as string
  '功能：为组合框或列表框提供数据源（值列表）
  dim str as string
  dim d as date
  d=d1
  do while true
     if d>d2 the exit do
     str=str & d & ";"
     d=dateadd("d",1,d)
  loop
  datelist=left(str,len(str)-1)
end function

todaynew

aslxt 发表于 2013-5-30 13:10
谢谢版主的回复。
我的用途不是解决组合框或列表框的数据源，而是解决“查询指定时间段内所有日期的营业 ...

将缺少的日期追加到收入表中即可。