４章 カスタマイズ ／４-4レポート

リンクイメージを印刷する[Access97]

イメージを表示する（リンク）で作成したリンクイメージを印刷する方法を述べます。

リンクイメージ

＜操作手順＞
  1. 非連結コントロールの追加
    Soraレポートを［デザイン］で開きます。
    イメージを印刷する非連結のイメージコントロール（［Image1］）を追加します。 イメージのファイル名を参照するテキストコントロール（［画像ファイル名］）を追加します。
  2. コード画面の表示
    ［表示］ツールメニューの［コード］をクリックします。
  3. ［フォーマット時］イベントの追加
    詳細の［フォーマット時］イベントプロシージャを次のように設定します。
    Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
    Me![Image1].Picture = IIf(IsNull(Me![画像ファイル名]), "", conDir & Me![画像ファイル名])
    apRptFormat Me
End Sub
  4. フォルダ名を宣言
    コード画面の先頭にフォルダ名を宣言します。
    Option Compare Database
Option Explicit
Const conDir As String = "C:\Program Files\Sora\Img\"   '表示フォルダ