PaperHeight プロパティ

用紙の高さを取得する。

型:

倍精度浮動小数点型 (インチ表示、読込みのみ)

注意点

なし

使用例


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

Private WithEvents oJobMonitor As easyPDFPrinter.PrintJobMonitor

Private Function oJobMonitor_OnPrinterInit(ByVal uID As Long, ByVal JobInfo As easyPDFPrinter.PrintJobInfo) As Long
    MsgBox "用紙幅: " + CStr(JobInfo.PaperWidth) + " インチ"
    MsgBox "用紙高さ: " + CStr(JobInfo.PaperHeight) + " インチ"
    oJobMonitor_OnPrinterInit = 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"