HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS

VB.NET 2005の開発でお困りのことはありませんか？
そんな悩みは当サイトで解決！！

HOME > VB.NET 2005 Tips > コントロール > PageSetupDialog Tips メニュー

04.余白を設定する

UPDATE:2007/07/05 

<< 前のTips  次のTips >>

 

　PageSetupDialogの[余白]を設定するには、PageSettings.Marginsプロパティを使用します。Marginsプロパティの単位をミリメートして扱うにはPageSetupDialogのEnableMetricプロパティをFalseにする必要があります。(Trueにした場合はインチ計算されます。)
　ただし、ミリ計算はされますが 10 = 1ミリメートル となることに注意してください。
　

　
サンプル
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim ps As New Printing.PageSettings

    'ページ設定情報をダイアログにセット
    PageSetupDialog1.PageSettings = ps

    '単位をミリメートルとして扱う
    PageSetupDialog1.EnableMetric = False

    '余白の設定
    ps.Margins.Left = 10   ' 1mm
    ps.Margins.Top = 10    ' 1mm
    ps.Margins.Bottom = 10 ' 1mm
    ps.Margins.Right = 10  ' 1mm

    '[印刷の向き]を無効にする
    PageSetupDialog1.AllowOrientation = False

    'PageSetupダイアログを表示する
    If PageSetupDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

    End If
End Sub