已经可以子表分页了，现在遇到打印问题，怎么打印分页子表？是否用基于后台数据生成报表？基于后台数据生成报表
Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim fl As String = ProjectPath & "Reports\出库单.xls"
book.AddDataTable("出库","数据源名称","Select * f rom {出库} where 出库单编号= 'CK-20030726001'") '添加父表
book.AddDataTable("出库明细","数据源名称","Select * f rom {出库明细} where 出库单编号= 'CK-20030726001'") '添加子表
book.AddRelation("出库","出库单编号","出库明细","出库单编号") '建立关联
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
例子是基于具体某个编号的子表打印。如果所有编号的子表打印呢，这个该怎么写？
加好友 
发短信
Post By：2020/6/2 14:36:00 [只看该作者]
