HOME > 即効テクニック > AccessVBA > フォーム・レポート > レポートの背景に文字を印刷する

即効テクニック

フォーム・レポート

レポートの背景に文字を印刷する

(Access 2000/2002)
● 概要 ●
レポートの背景に「社外秘」などの文字を印刷することができます。背景に文字を印刷したいセクションのFormatイベントに、Printメソッドを記述し、引数Exprに印刷する文字を指定します。

  構文  expression.Print(Expr)

  引数              内容
  Expr               表示する文字列

expressionにはReportオブジェクトを指定します。
以下のサンプルは、レポートヘッダーセクションの背景に「社外秘」の文字を印刷
します。


● サンプル ●
Private Sub レポートヘッダー_Format _
            (Cancel As Integer, FormatCount As Integer)
    With Report_sample
        .FontName = "MS P明朝"          'フォントの種類を指定
        .FontSize = 50                     'フォントサイズを指定
        .FontItalic = True                 '斜体を指定
        .FontBold = True                   '太字を指定
        .ForeColor = RGB(250, 100, 100)    'フォントカラーを指定
        .CurrentX = 1000           'セクション内での水平方向の位置を指定
        .CurrentY = 50             'セクション内での垂直方向の位置を指定
        .Print "社外秘"                    '背景に印刷する文字を指定
    End With
End Sub