Office中国论坛/Access中国论坛

标题: 报表为什么不能打印筛选后子窗体的记录 [打印本页]

作者: 付谦 时间: 2006-8-30 04:02
标题: 报表为什么不能打印筛选后子窗体的记录
此段代码不知错在何处，起不到筛选作用，请帮改一改，能打印子窗体筛选后的记录

Private Sub Label1_Click()
On Error GoTo Err_Label1_Click
Me.聘任子窗体.Requery

Dim stDocName, strWhere As String

stDocName = "聘任名册"
strWhere = Me.[聘任子窗体].Form.Filter

DoCmd.OpenReport stDocName, acPreview, , strWhere

Exit_Label1_Click:
Exit Sub

Err_Label1_Click:
MsgBox err.Description
Resume Exit_Label1_Click
End Sub

[attach]20057[/attach]

作者: andymark 时间: 2006-8-30 04:45
参考下面的例子

http://www.office-cn.net/forum.php?mod=viewthread&tid=38709&replyID=5612&skin=1

作者: guohuikey 时间: 2006-9-2 19:25
标题: fdf
dddd

作者: longrange 时间: 2006-11-1 23:28
晕了。。

作者: songlili0806 时间: 2008-5-22 09:22
ooo

作者: 白河寒秋 时间: 2008-5-25 22:07
感谢这个帖子，去年做的一个系统因为刚才看了这个帖子，解决了，非常谢谢

作者: 白河寒秋 时间: 2008-5-25 22:10
只要将查询字符作为全局变量，传递给报表就可以了。本人做的系统全是ADP的，一般都用代码直接解决问题，很少使用查询中的一些技巧的

作者: wangwang 时间: 2008-6-15 18:09
学习中

作者: STJOHNLEE 时间: 2009-4-3 02:40
努力学习ACCESS

作者: dyj6510 时间: 2009-5-28 18:41
10# STJOHNLEE
学习学习

作者: dyj6510 时间: 2009-5-28 18:42
11# dyj6510
怎么还是打不开？

作者: dyj6510 时间: 2009-5-28 18:43
12# dyj6510
学习

作者: dyj6510 时间: 2009-5-28 18:44
13# dyj6510
想看例题

作者: dyj6510 时间: 2009-5-28 18:45
14# dyj6510
我也想看，就是。。。

作者: dyj6510 时间: 2009-5-28 18:45
15# dyj6510
没办法，太麻烦了

作者: dyj6510 时间: 2009-5-28 18:46
16# dyj6510
看。。。

作者: dyj6510 时间: 2009-5-28 18:47
看例题

作者: 文棣 时间: 2011-7-4 20:29
学习下下下

作者: 文棣 时间: 2011-7-12 16:40
好好学习！

作者: zyhgmai 时间: 2011-8-4 08:44
2楼链接连不上

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