VSPrinter 8.0 里如何添加 表头显示项

Question

我希望的效果如下：
                           XXX公司 XXX报表
车间：XXX   时间：yyyy-mm-dd 至yyyy-mm-dd 请问如何搞。。
我弄来弄去只有通过 header属性 添加了 XXX公司 XXX报表 但是下面的车间 日期 这些都无法添加进去。。请教各位兄弟。。帮忙。。谢谢~~！

Answer 1

For i = 1 To .PageCount
            .StartOverlay i
            .CurrentX = .MarginLeft
            .CurrentY = .MarginTop - 220
            .FontBold = True
            .Paragraph = m_LeftSubHeader
            
            .CurrentX = .PageWidth - .TextWidth(m_SubHeader) - .MarginRight
            .CurrentY = .MarginTop - 220
            .FontBold = False
            .Paragraph = m_SubHeader
            
            strFooter = "共" & .PageCount & "页   第" & i & "页"
            .CurrentX = (.PageWidth - .TextWidth(strFooter)) / 2
            .CurrentY = .PageHeight - .TextHeight(m_SubHeader) - .MarginFooter
            .Paragraph = strFooter
            .EndOverlay
        Next