用紙サイズ、向きを変えた後に印刷領域を取得するには？ (ID:147749)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 shu様ありがとうございます。 Landscape = Trueをしても変わらないのですね e.MarginBoundsも調べたのですが余白がどうも大きすぎて上手くゆかず 以下のように印刷領域を取得してみました。 e.Graphics.TranslateTransform(PrintDocument3.DefaultPageSettings.HardMarginX * -1, PrintDocument3.DefaultPageSettings.HardMarginY * -1) Dim X As Integer = PrintDocument1.DefaultPageSettings.HardMarginX Dim Y As Integer = PrintDocument1.DefaultPageSettings.HardMarginY Dim Width As Integer = e.Graphics.VisibleClipBounds.Width Dim Height As Integer = e.Graphics.VisibleClipBounds.Height 少々斜め上な対処かもしれませんがとりあえず印刷領域を取得する事が できました。ありがとうございました。