印刷の一行目、右詰めと左詰めに印刷するには？ (ID:90263)

名前

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

本文 .NET です。 ヘッダーのつもりで、一行目の左端にファイル名 右詰めに印刷日時を印刷したいのですが苦労しています。 まず、ファイル名だけでも右詰めに印刷しようと Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage Dim headerString As String = "ファイル名" Dim headerFont As New Font("MS UI Gothic", 8) Dim headerAreaSize As SizeF headerAreaSize = e.Graphics.MeasureString(headerString, headerFont) Dim fmt As New StringFormat fmt.Alignment = StringAlignment.Far fmt.LineAlignment = StringAlignment.Near e.Graphics.DrawString( _ headerString, _ headerFont, _ Brushes.Black, _ New RectangleF(e.MarginBounds.Left, e.MarginBounds.Top, e.MarginBounds.Right, e.MarginBounds.Top + headerAreaSize.Height), _ fmt _ ) Dim pointL As New PointF(e.MarginBounds.Left, e.MarginBounds.Top + headerAreaSize.Height) Dim pointR As New PointF(e.MarginBounds.Right, e.MarginBounds.Top + headerAreaSize.Height) e.Graphics.DrawLine(New Pen(Color.Black, 1), pointL, pointR) End Sub これだとRectangleFの中に文字が入らず、右上から文字が始まります。 何処が間違っているのでしょうか？ また、両サイドに印刷するサンプルでも無いでしょうか？ よろしくお願いします。