主题：报表打印

Dim Book As New XLS.Book(ProjectPath & "Attachments\详单.xls")

Dim fl As String = ProjectPath & "Reports\详单.xls"

Book.Build() '生成细节区

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Verb = "Print" '指定动作

Proc.Start()

上面是打印选中的

例如员工资料卡全部打印代码怎么写