主题：[求助]如何打印已生成的专业报表

 专业报表是动态生成的，不能保存成文件后直接把文件载入和打印。

抱歉，谢谢提醒

 

保存

 

Dim doc As new PrintDoc
Dim rt As New prt.RenderText '定义一个文本对象
rt.Text = "Hello Foxtable" '设置文本对象的内容
doc.Body.Children.Add(rt) '将文本对象加入到报表
doc.save("d:\test")

 

'---------------------------------

 

导入

 

Dim rdoc As new PrintDoc
rdoc.Load("d:\test")
rdoc.Preview