以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  仙儿们~ 能实现点击一下“打印”按钮，打两个窗口的“凭证”吗？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33891)
--  作者：scx121
--  发布时间：2013/5/26 22:12:00
--  仙儿们~ 能实现点击一下“打印”按钮，打两个窗口的“凭证”吗？

小弟两个 打印 窗口，窗口1和 窗口2，现在窗口1上的打印按钮是： 

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()

 

 

窗口2的打印按钮也是：

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()

 

小弟想按一下窗口1的打印按钮能把窗口1和窗口2 都打印出来！！！ 能实现吗？要不还得按下窗口1上的按钮，打印完成再按窗口2上的打印，麻烦啊~~
--  作者：程兴刚
--  发布时间：2013/5/27 0:02:00
--  

窗口1打印按钮代码：

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()

Forms("窗口2").open()

Forms("窗口2").Controls("打印按钮").PerformClick()
--  作者：scx121
--  发布时间：2013/5/27 1:39:00
--  
以下是引用程兴刚在2013-5-27 0:02:00的发言：

窗口1打印按钮代码：

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()

Forms("窗口2").open()

Forms("窗口2").Controls("打印按钮").PerformClick()

能得到您在这么晚给予的支持和帮助，我深表感动，您写的教程真的很具体、很详细，还是很感谢您帮助我们这些加班到深夜的人。

 

                                                                                                                                                                                …… 祝：健康、平安！
--  作者：zike108308
--  发布时间：2013/9/20 1:19:00
--  
同求。打印机的垮表格打印