Office中国论坛/Access中国论坛

标题: 打印选择款取消或确认都继续执行后面的代码 [打印本页]

作者: xyh2732    时间: 2011-11-30 21:01
标题: 打印选择款取消或确认都继续执行后面的代码
请问如何可以实现以下功能。打印记录的时候会弹出打印机选择框,如可可以使确认或者取消都继续执行后边的代码?[attach]47497[/attach]
作者: todaynew    时间: 2011-11-30 21:10
没什么意义,多操作一次而已。
作者: xyh2732    时间: 2011-11-30 21:14
todaynew 发表于 2011-11-30 21:10
没什么意义,多操作一次而已。

我后面还有其他代码,没上传

作者: andymark    时间: 2011-11-30 21:34
示例代码逻辑上有问题

On Error Resume Next

If (MsgBox("是否打印", vbOKCancel + vbInformation, "系统提示")) = vbOK Then '确认是否打支票

    DoCmd.SelectObject acReport, "rpt", True
     DoCmd.DoMenuItem acFormBar, 0, 9, , acMenuVer70 '选择打印机打印

End If

作者: andymark    时间: 2011-11-30 21:35
增加出错处理: On Error Resume Next


作者: Henry D. Sy    时间: 2011-11-30 21:35
On Error Resume Next
作者: Henry D. Sy    时间: 2011-11-30 21:36
晕!抢答题!!{:soso_e109:}
作者: xyh2732    时间: 2011-11-30 23:15
谢谢大家的帮忙,




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3