OnPageStart イベント

プリンタが新しいページをプリントする際にコールされる。

Function OnPageStart(uID As Long,
                     PageNumber As Long) As Long

パラメータ

戻り値

戻り値としてprnMonitorResponse 内で指定されている値の1つを使用してください。

注意点

なし

使用例


' "WithEvents"キーワードで変数を宣言します

Private WithEvents oJobMonitor As easyPDFPrinter.PrintJobMonitor



Private Function oJobMonitor_OnPrinterInit(ByVal uID As Long, ByVal JobInfo As easyPDFPrinter.PrintJobInfo) As Long

    ' ...

    oJobMonitor_OnPrinterInit = PRN_MON_CONTINUE_CONVERSION

End Function



Private Function oJobMonitor_OnPrinterUpdate(ByVal uID As Long, ByVal JobInfo As easyPDFPrinter.PrintJobInfo) As Long

    ' ...

    oJobMonitor_OnPrinterUpdate = PRN_MON_CONTINUE_CONVERSION

End Function



Private Function oJobMonitor_OnPrinterStart(ByVal uID As Long) As Long

    ' ...

    oJobMonitor_OnPrinterStart = PRN_MON_CONTINUE_CONVERSION

End Function



Private Function oJobMonitor_OnPageStart(ByVal uID As Long, ByVal PageNumber As Long) As Long

    ' ...

    oJobMonitor_OnPageStart = PRN_MON_CONTINUE_CONVERSION

End Function



Private Function oJobMonitor_OnPrinterEnd(ByVal uID As Long, ByVal Result As prnPrinterResult) As Long

    ' ...

    oJobMonitor_OnPrinterEnd = PRN_MON_CONTINUE_CONVERSION

End Function



' ...



Set oPrinter = CreateObject("easyPDF.Printer.7")

Set oPrintJob = oPrinter.PrintJob

Set oJobMonitor = oPrinter.PrintJobMonitor

oPrintJob.PrintOut "C:\input.doc", "C:\output.pdf"