主题：[求助]报表保存和引用

abc_page1.jpg
abc_page2.jpg
abc_page3.jpg
...

报表的每一页都会生成一个独立的图片文件。

想应用这些文件，如何写？现在代码报错。

请大家看看？

For Each k As Row In Tables("print_A5").GetCheckedRows

    Dim Rows As List(Of DataRow)

    Dim CurRow As Row = k

    Dim ro As New prt.RenderImage '定义一个图片对象

    ro.Image = GetImage(ProjectPath & "\Images\QR\临时_page" & k & ".jpg" )    '设置图片   

    ro.Style.Spacing.Bottom = 10  '设置下间隔为3毫米

    ro.SplitVertBehavior = prt.SplitBehaviorEnum.Never '避免垂直换页的时候，表格被分割成两部分。

    ro.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center '图片水平居中

    ro.Style.ImageAlign.AlignVert = prt.ImageAlignVertEnum.Center '图片垂直居中

    ro.Style.ImageAlign.StretchHorz = False '禁止水平方向扩展图片

    ro.Style.ImageAlign.StretchVert = False '禁止垂直方向扩展图片

    doc1.Body.Children.Add(ro) '将图片对象加入报表

    doc1.PageSetting.Landscape = True '横向打印

Next