报表为什么不能打印筛选后子窗体的记录

付谦 · 发表于 2006-8-30 04:02:00

此段代码不知错在何处，起不到筛选作用，请帮改一改，能打印子窗体筛选后的记录

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

andymark · 发表于 2006-8-30 04:45:00

参考下面的例子

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

guohuikey · 发表于 2006-9-2 19:25:00

dddd

longrange · 发表于 2006-11-1 23:28:00

晕了。。

songlili0806 · 发表于 2008-5-22 09:22:07

白河寒秋 · 发表于 2008-5-25 22:07:44

感谢这个帖子，去年做的一个系统因为刚才看了这个帖子，解决了，非常谢谢

白河寒秋 · 发表于 2008-5-25 22:10:05

只要将查询字符作为全局变量，传递给报表就可以了。本人做的系统全是ADP的，一般都用代码直接解决问题，很少使用查询中的一些技巧的

白河寒秋 · 发表于 2008-5-25 22:10:26

只要将查询字符作为全局变量，传递给报表就可以了。本人做的系统全是ADP的，一般都用代码直接解决问题，很少使用查询中的一些技巧的

wangwang · 发表于 2008-6-15 18:09:19

学习中

STJOHNLEE · 发表于 2009-4-3 02:40:29

努力学习ACCESS

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

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

本帖子中包含更多资源

fdf

群介绍
主题无相 (随机显示版	同地区群块其他地区)