主题：[求助] 直接打印

老师，下面代码可以生成报表，预览、打印。是否可以不预览直接打印？如何修改代码？谢谢！

Dim tm As String  = ProjectPath & "Attachments\打印退回冲单.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\打印退回冲单.doc" '指定目标文件
Dim wrt As New WordReport(Tables("出库单"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表