设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2728|回复: 5
打印 上一主题 下一主题

在报表中对统计出来的数据,如何得到“当前报表的统计起止时间";

[复制链接]
跳转到指定楼层
1#
发表于 2011-7-28 10:47:15 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
在报表中如何合计“当前报表的统计起止时间";

通过如下代码给报表加条件:

DoCmd.OpenReport "R0B0002", A_PREVIEW, , WhereString

问题:

在报表中如何设置“当前报表的数据”中最大时间及最小时间,即在报表中给一个标注:统计期限为XXXX年XX月XX日到XXXX年XX月XX日
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2011-7-28 11:43:21 | 只看该作者
既然能获取WhereString值,就可以根据这个值来提取日期了,至于放在页眉还是页脚,那就随意了。
3#
 楼主| 发表于 2011-7-28 13:16:43 | 只看该作者
回复 roych 的帖子

在报表中,如何根据这个值来取得日期???
4#
发表于 2011-7-28 13:19:41 | 只看该作者
设置一个变量和控件,在主体的格式化事件里,将控件值设置为这个变量即可。
5#
 楼主| 发表于 2011-7-28 13:52:51 | 只看该作者
我是这样处理的,但不对:

Private Sub Report_Activate()
    DoCmd.Maximize
    '以当前的数据源来确定起止日期
Me.文本32 = "统计期限:" & DMin("查询日期", Me.RecordSource) & " 到: " & DMax("查询日期", Me.RecordSource)
end sub
6#
发表于 2011-7-28 16:18:13 | 只看该作者
直接用数据源有些麻烦。按我的理解,你应该是在窗体中建立按钮,再打开报表的吧?
1、如果主窗体有日期查询条件就最好不过了,只需要在报表里建立一个函数,对报表中的文本控件指定数据源即可。
2、如果没有查询条件,请在页脚处建立一个 DMin和Dmax的隐藏文本控件,然后在报表处建立一个函数引用过来。
Function Mytxt(ctr As Control) As String
Mytxt = ctr
End Function
在报表的文本控件的源里输入:
=Mytxt(Forms!窗体名!控件名)
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-7 15:30 , Processed in 0.077034 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表