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

付谦 · 发表于 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

zyhgmai · 发表于 2011-8-4 08:44:05

2楼链接连不上

文棣 · 发表于 2011-7-12 16:40:31

好好学习！

文棣 · 发表于 2011-7-4 20:29:35

学习下下下

dyj6510 · 发表于 2009-5-28 18:47:55

看例题

dyj6510 · 发表于 2009-5-28 18:46:11

16# dyj6510
看。。。

dyj6510 · 发表于 2009-5-28 18:45:27

15# dyj6510
没办法，太麻烦了

dyj6510 · 发表于 2009-5-28 18:45:02

14# dyj6510
我也想看，就是。。。

dyj6510 · 发表于 2009-5-28 18:44:20

13# dyj6510
想看例题

dyj6510 · 发表于 2009-5-28 18:43:59

12# dyj6510
学习

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

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

主题相关群

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

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

本帖子中包含更多资源

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