オブジェクトをクリアするときは、下記のコードでクリアする 'ドキュメント Dim doc As C1.C1Preview.C1PrintDocument 'オブジェクトの全クリア doc.Body.Children.Clear()

C1PrintDocumentを使い、定型用紙サイズではなく、指定用紙サイズに したい場合は、下記のように記述する。 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load doc = New C1PrintDocument 'ドキュメ…

Private Sub MakeDoc1(ByVal doc As C1PrintDocument) ' ドキュメントを初期化 doc.Clear() End Sub

Private Sub MakeDoc1(ByVal doc As C1PrintDocument) ' ドキュメントのタイトルを作成 Dim rp As New RenderParagraph() rp = New RenderParagraph() 'フォントの指定 rp.Style.Font = New Font("ＭＳ Ｐゴシック", 36) '文字列の指定 rp.Content.Add(New P…