主题：[求助]窗体连续打印问题？

甜版，我做了一个凭证打印窗体，按要求筛选，然后打印，打印按钮代码如下：

If Filter > "" Then

    DataTables("记账凭证_主表").loadFilter = Filter

    DataTables("记账凭证_主表").load()

    Dim doc As PrintDoc = Forms("记账凭证").GernatePrintDoc()

    doc.Preview

End If

但单击后预览显示空页，记账凭证窗体和·凭证打印窗体是分着的，不知错在哪里了·。