以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  专业报表可以直接打印吗  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194102)
--  作者：rogen
--  发布时间：2024/11/11 6:35:00
--  专业报表可以直接打印吗
设置好了默认打印机和纸张，
专业报表可以不用跳转到预览界面，直接打印吗？
--  作者：有点蓝
--  发布时间：2024/11/11 8:33:00
--  
可以

doc.Preview
改为
doc.Print
--  作者：rogen
--  发布时间：2024/11/13 8:55:00
--  
专业报表预览后，能传参到预览界面的打印数量这不？
打印面单时，会根据件数 打印对应数量的标签，挨个贴外箱上

试过循环直接打印，但速度很慢，只有连续打印的1/5的速度


图片点击可在新窗口打开查看此主题相关图片如下：pixpin_2024-11-13_08-52-32.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2024/11/13 9:09:00
--  
参考：

Dim doc As New PrintDoc \'定义一个报表
Dim rt As New prt.RenderText \'定义一个文本对象
rt.Text = "Hello Foxtable" \'设置文本对象的内容
doc.Body.Children.Add(rt) \'将文本对象加入到报表
Dim ps As new System.Drawing.Printing.PrinterSettings
ps.Copies = 2   \'设置份数\' -- 注释这句，可以取消不显示打印中提示窗口
doc.Print(ps)     \'打印
[此贴子已经被作者于2024/11/13 9:10:46编辑过]