デザイナのDetailを最終ページのみ印刷するには？

penny 2013-10-17 02:52:23 No: 103460

VB6.0のデザイナを用い、同じ内容のレポートを複数枚印刷する際に、
Detailを最後のみ印刷したいのですが、一度、
「.Detail.Visible = False」を設定して
「.PrintReport False」で印刷してしまうと、
最後の印刷前に「.Detail.Visible = True」
を設定してもDetailが印刷されません。

何かほかのプロパティを変更することで
印刷が可能になったりするのでしょうか。
お教え頂ければ幸いです。

-----------------------------------
' 印刷
oDesigner.Detail.Visible = False
For iCnt = 1 To iPrintNum

    ' 最後の場合
    If iCnt = iPrintNum Then

        ' Detail印刷
        oDesigner.Detail.Visible = True
    End If

    ' 印刷
    oDesigner.PrintReport False
Next
-----------------------------------

以上、よろしくお願いいたします。