印刷余白のコードでの設定を反映させるには？

こん 2003-10-30 08:35:28 No: 109565

よろしくお願いします。

ＶＢ.ＮＥＴで印刷時に以下のように余白の設定をしましたが、
設定値を「100」以外のいろいろな値を試しましたが印刷時の余白に
全く変化がありません。

Private Sub PrintDocument1_PrintPage  〜

  e.Graphics.DrawString("あああああ", _
  New Font("MS UI Gothic", 10, FontStyle.Regular), _
         Brushes.Black, 0, 0)
End Sub

Private Sub Button1_Click〜

PrintDocument1.DefaultPageSettings.Margins.Top = 100
PrintDocument1.Print()

End Sub

次のようにもやってみましたが、ダメでした。。。

PrintDocument1.PrinterSettings.DefaultPageSettings.Margins.Top = 100

なぜでしょうか、お願いいたします。