设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12
返回列表 发新帖
楼主: yzc2011
打印 上一主题 下一主题

ACCESS如何查询订单查询详表中字段为空值的记录

[复制链接]
11#
 楼主| 发表于 2017-3-23 01:33:43 | 显示全部楼层
打印有点问题
如何把空值查询的结果传到报表中打印。同时不影响原打印功能。

原打印代码:
Private Sub 订单查询预览打印_Click()
    On Error GoTo Err_订单查询预览打印_Click
    Dim stDocName, strWhere As String
    stDocName = "订单查询打印"
    strWhere = Me.订单查询详表.Form.Filter
    '在打开报表的同时把子窗体的筛选条件字符串也传递给报表,
    '这样地话报表也会显示和子窗体相同的记录。
    DoCmd.OpenReport stDocName, acPreview, , strWhere
   
Exit_订单查询预览打印_Click:
    Exit Sub
Err_订单查询预览打印_Click:
    MsgBox Err.Description
    Resume Exit_订单查询预览打印_Click
End Sub

0323.JPG (252.47 KB, 下载次数: 85)

0323.JPG

订单管理0323.rar

68.43 KB, 下载次数: 17, 下载积分: 金钱 -1 点

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-4 04:36 , Processed in 0.105813 second(s), 26 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表