主题：用三张表信息打印同一张piao据，中的上一条与下一条的代码怎么写？

With Tables("凭证")

    .Position = .Position - 1

End With

With Tables("凭证")

    .Position = .Position + 1

End With

这是只真对一张表做的“上一条”，“下一条”按钮的代码。

我想要用三张表上的信息，在同一张piao据上打印，这个代码得怎么写？

1、是一次打印相同的三张表的意思？

2、还是说，排版什么的全部不同？如果不同，就应该重新做一个模板。

---------

具体问题请上传例子。

 上传例子

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Print

 1、上传例子；

 2、上传例子；

 3、

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Print