7.6 报表的打印及打印预览
7.6.1 报表预览
7.6.2、报表对象的打印及
其打印预览驱动
返回
对于一个设计完毕的报表对象, 我们可以在
数据库设计视图中的报表对象选项卡上选中它,
然后单击, 预览, 按钮,,, 即可实现
报表对象的预览操作 。
但是在,零售商店管理信息系统” 数据库中，
由于所有的报表对象数据源均来源于相关的查询
或图表子报表，而这些查询与图表子报表的数据
源取值条件又均来自于某些窗体对象的相关文本
框。因此，在窗体未运行以前，这些数据源的取
值条件均无法得到满足，从而无法获取数据，而
必须借助于
7.6.1 报表预览
因为报表对象仅有输出数据的功能,
而不具备数据输入 /输出的交互功能, 所
以报表对象的驱动 （ 包括报表预览和打
印 ） 一般由窗体对象实施 。 在 CMMIS数
据库中,, 销售交接班报表, 由, 交接
班结转清, 窗体驱动,, 销售业绩查询,
报表由, 销售业绩查询汇总, 窗体驱动 。
例如,,交接班结转清, 窗体的运
行视图如图所示：
7.6.2、报表对象的打印及其打印预览驱动
图 7-37,,交接班结转清, 窗体运行视图
按钮,, 的, 单击, 处理程序
为：Private Sub Command61_Click()
On Error GoTo Err_Command61_Click
Dim stDocName As String
stDocName = "销售交接班报表 "
DoCmd.OpenReport stDocName,acPreview
Exit_Command61_Click:
Exit Sub
Err_Command61_Click:
MsgBox Err.Description
Resume Exit_Command61_Click
End Sub
这个程序的第五行语句即为驱动, 销
售交接班报表, 进入预览状态的命令 。
这条语句尾部关键字, acPreview”的作用
即导致预览报表 。 如果将这个关键字修
改为, acViewNormal”,则可使得报表进
入打印状态 。
又例如,,销售业绩查询汇总, 窗体的运
行视图如图所示：
7-38,,销售业绩查询汇总, 窗体运行视
图
按钮,, 的, 单击, 事件处理程序
为：Private Sub Command71_Click()
On Error GoTo Err_Command71_Click
Dim stDocName As String
stDocName = "销售业绩查询 "
DoCmd.OpenReport stDocName,acPreview
Exit_Command71_Click:
Exit Sub
Err_Command71_Click:
MsgBox Err.Description
Resume Exit_Command71_Click
End Sub
这个程序的第五行语句即为驱动, 销售业绩查询,
报表进入预览状态的命令。