上面的代码会打开生成的所有文件的,自行到电脑系统任务栏切换查看
Book.Build() '生成细节区
Book.Save(fl)
Result = MessageBox.Show("报表已生成,要预览还是打印?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
Dim Proc As New Process
Proc.File = fl
Proc.Start()
else
Dim Proc As New Process
Proc.File = fl
Proc.Verb = "Print" '指定动作
Proc.Start()
End If