求代码，如果报表中某文本框不为空则打印此报表

phenix　发表于：2010-09-15 17:23:57 　

假设报表A上有文本框B，想用一句代码控制报表的输出，使B不为空的时候则打印A，如果B为空则不打印A。

不知该如何实现，请各位高手帮忙，多谢了。

yinyt 发表于：2010-09-15 19:18:02

你可以在窗体上设计一个按钮

private sub 按钮_click()

if isnull(me.文本框B) then

DoCmd.OpenReport "A", acPreview

else

DoCmd.OpenReport "A"

end if

end sub

phenix 发表于：2010-09-15 20:47:05

多谢yinyt的回复，可是在您的代码中，光写(me.文本框B)还不够吧，是否还需要制定报表名？如果不然这个(me.文本框B)是不是应该默认为是窗体上的文本框？

yinyt 发表于：2010-09-15 21:12:07

是的，我说过了，在窗体上设一个按钮，那么me.文本框B一定是窗体上的控件。

phenix 发表于：2010-09-15 21:28:49

另外，DoCmd.OpenReport "A", acPreview 和 DoCmd.OpenReport "A"有什么区别？

phenix 发表于：2010-09-15 21:29:57

回yinyt排长3楼：可那个文本框B是报表上的，而不是窗体上的。

总记录：5篇页次：1/1 9 1 :

Access交流中心