[求助]在报表中如何只导入图片一次就完成打印？

okmijnj · 发表于 2006-11-9 16:59

在报表中如何只导入图片一次就完成打印？

我的方法是先打开报表的设计视图，再更改图片（导入一次），打印（又要导入一次）。

如果图片很大的话，而且又多的话就要浪费很多时间。请高手指点一下！

代码如下：

DoCmd.OpenReport "报表1", acViewDesign, "", "", acHidden

Reports![报表1]!Image5.Picture = "c:\image.gif"

DoCmd.OpenReport "报表1", acViewNormal, "", "", acHidden

Renco · 发表于 2006-11-10 08:55

okmijnj · 发表于 2006-11-10 14:50

改成如下:

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
Me.Image5.Picture = "c:\image.gif"
End Sub

DoCmd.OpenReport "报表1", acViewNormal, "", "", acHidden

		自动登录	找回密码
密码			免费注册