NewPage

説明

現在のページの終了と新しいページの開始を指定します。通常は PrintText と併用します。

戻り値の型

なし

構文

object.NewPage

NewPage メソッドは次のパラメータから構成されています。

例

strPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"

Set TK = CreateObject("APToolkit.Object")

r = TK.OpenOutputFile("Ouput.pdf")

TK.SetFont "Helvetica", 15

TK.SetTextColor 255, 0, 50, 0

TK.PrintText 300, 400, "This is Red"

TK.ForceColorReset

TK.NewPage

TK.SetFont "Helvetica", 15

TK.PrintText 300, 200, "This is now Black"

TK.CloseOutputFile

Set TK = Nothing