Office中国论坛/Access中国论坛

标题: 跨年度合计查询如何做？ [打印本页]

作者: ccczzz 时间: 2003-6-21 04:56
标题: 跨年度合计查询如何做？
跨年度合计查询如何做？要求年度期间为：本年度6月30日到上年度7月31日。例： 2002-07-01至2003-06-31为一个核算年度。谢谢

作者: ccczzz 时间: 2003-6-21 07:21
标题: 跨年度合计查询如何做？求助
跨年度合计查询如何做？要求年度期间为：本年度6月30日到上年度7月31日。例： 2002-07-01至2003-06-31为一个核算年度。谢谢[attach]856[/attach]

作者: chenghai 时间: 2003-6-21 18:26
编一段代码吧，根据自己的需要计算年月——类似计算财务年月的。

作者: chenghai 时间: 2003-6-21 18:28
Function CWYear(CWDate As Date) As Integer

Dim y  As Integer
Dim ZDDate As Date

  y = Year(CWDate)
  ZDDate = DateSerial(y, 7, 1)

  If CWDate < ZDDate Then
CWYear = y
  Else
CWYear = y + 1
  End If

End Function

作者: 唐小小 时间: 2003-6-21 20:01
我不是太明白你的要求

作者: ccczzz 时间: 2003-6-21 20:39
查询发生在一个注册年度中的费用，例：2002-07-01到2003-06-30为一个注册年度，以[就诊日期]进行分类汇总费用

作者: chenghai 时间: 2003-6-21 22:48
我无法下载你的文件（公司电脑）。
你把案例发到我的电子信箱里吧（在我的资料里有），我来做案例。

作者: sweetduck 时间: 2003-6-25 07:12
就在查询里日期字段准则设置为 between [日期1] and [日期2] 不就行了？
日期可以预先设定或是来源于窗体控件
想问题想那么复杂做什么！

作者: 唐小小 时间: 2003-6-25 16:22
八楼说的对，我也是这样想的，为什么要那么麻烦，设置查询条件不就行了吗？

作者: ccczzz 时间: 2003-6-25 21:04
是的，问题已解决。

作者: 唐小小 时间: 2003-6-25 23:17
那就好

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)