PDF ドキュメントの生成中に問題が発生しました。PDF ドキュメントに表示したいテキストが PDF 用紙の範囲を超えています。ページ範囲に合わせてテキストを調整するにはどうすればよいですか?
これは、いくつかの質問と回答を示す私のコードのサンプルです。
Dim PDF As PDFCreatorPilotLib.PDFDocument3
' create pdf library object
PDF = New PDFCreatorPilotLib.PDFDocument3
' initialize PDF Engine
PDF.StartEngine("demo@demo", "demo")
' set filename
PDF.FileName = "TestVB.PDF"
PDF.AutoLaunch = True ' auto-open generated pdf document
' start document generation
PDF.BeginDoc()
PDF.PDFPAGE_SetActiveFont("Verdana", True, False, False, False, 9, 0)
PDF.PDFPAGE_TextOut(80, 270, 0, Label5.Text)
PDF.PDFPAGE_TextOut(100, 270, 0, Questions1TextBox.Text)
PDF.PDFPAGE_TextOut(80, 300, 0, Label3.Text)
PDF.PDFPAGE_TextOut(100, 300, 0, Answers1TextBox.Text)
PDF.PDFPAGE_TextOut(80, 330, 0, Label6.Text)
PDF.PDFPAGE_TextOut(100, 330, 0, TextBox14.Text)
PDF.PDFPAGE_TextOut(80, 360, 0, Label4.Text)
PDF.PDFPAGE_TextOut(100, 360, 0, TextBox1.Text)
PDF.PDFPAGE_TextOut(80, 390, 0, Label7.Text)
PDF.PDFPAGE_TextOut(100, 390, 0, TextBox12.Text)
PDF.PDFPAGE_TextOut(80, 420, 0, Label4.Text)
PDF.PDFPAGE_TextOut(100, 420, 0, TextBox1.Text)
' finalize document generation
PDF.EndDoc()
End Sub