タイトル : Re^3: Re5: VB.NETの印刷の改ページ処理 投稿日 : 2006/03/15(Wed) 11:22 投稿者 : あきこ
魔界の仮面弁士さん、YASさん、昨日は大変ありがとうございました。 この問題は1年位私の頭を悩ませていました。 > 別々のPrintDocumentに出力しているのですから別々に印刷されてしまいます。 そうなんです。 イヤというほどわかってます。 私はデータの数だけ e.Graphics.DrawString(・・・ を書いていました。 でも、昨日色々と教えられて問題は、横座標と縦座標なのだとやっとわかりました。 マサノリさんのように一定間隔に縦にさがっていくのなら、魔界の仮面弁士さんの3274サンプルプロ グラムの ページ番号+=1の下に 縦座標+=いくつ かを加えれば出来るような気がします。 私の場合縦・横の座標が一定間隔に動くのでは無いのでIF文で判断をかけるようにした方が今やって いる方法より効率よいとわかりこれを取り入れようと決めました。 アッ!今魔界の仮面弁士さんの回答b調べたらまた、また回答を下さってたのですね! 長い、下手なコーディングを読んでくださって有り難うございました。 ハイ、少しごちゃ混ぜになっていました。 以下 魔界の仮面弁士さん回答3283より Private Sub PrintDocument1_PrintPage(・・・ ページ番号 += 1 Call タイトル印刷(e) Call 明細印刷(e, ページ番号) End Sub というイメージで処理できませんか? ★私これが出来ません!! (ページ番号ではなく、出力する座標位置で管理しても良いですけど) ☆しかたがないので今はこれにしようと思ってます。 マサノリさんの質問3278の最後: Private Sub に”No.1 100 250 300”を 印刷する設定をしても、e.Graphic(”No.1 100 250 300”〜) がエラー状態になってしまいます。 Private Sub には印刷の項目が書けない様ですし、どのようにすれば良いのか、・・・ Call 明細印刷(e, ページ番号)とする方法が私達にはこの「Private Sub 明細印刷」とする方法しか わかりません。どのようにするか教えていただけないでしょうか? 何度もすみません。 |