老师您好！
我的工艺流程卡的连续打印和预览有问题，我有一个模板，制作的报表，想用鼠标选择记录，然后，一条记录一张报表，我写的代码问题出在：1、只能预览一条记录，不能连续预览选中的记录，2、我不知道用哪条打印命令。3、我想有两种选择：预览/打印，烦请老师给予指教,谢谢！我将选择的记录和预览的效果表拍照了，并且把代码发给您，您参考一下。（照片中我选了两条记录，清单条码：202404280007，202308280009，可是预览结果只能显示第一个。
Dim Result As DialogResult
For Each dr As DataRow In DataTables("生产计划明细表").Select("清单条码编码 is not null")
Dim Book As New XLS.Book(ProjectPath & "Attachments\生产工艺加工流程卡模板.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim fl As String = ProjectPath & "Reports\" & dr("清单条码编码") & ".xls"
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()
End If
Next
上面的代码会打开生成的所有文件的，自行到电脑系统任务栏切换查看
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