アクセスでJPEGをレポートに貼り付けたく、イメージで貼り付けました 下記コードをイベントとして貼り付けられたのですが、ほかのページに移動したときに1ページ目のJPEGが残ったままになってしまいます。 なので、2ページ目以降のJPEGが貼られてない状況になってしまいます。 恐らく、起動時に1ページ目のJPEGを読み込んでそこで処理が終了しているのだとは思うのですが、どうやって解決するのか分かりません。 宜しくご教授願います。 下記コード Private Sub Report_Load() On Error GoTo blank_recode Me.搬入経路.Visible = True Me.写真.Visible = False If Not Nz(Me.搬入経路) Then Me.写真.Picture = Me.搬入経路 Else Me.搬入経路.Visible = False Me.写真.Visible = True End If Exit Sub blank_recode: Me.搬入経路.Visible = False Me.写真.Visible = True Resume Next End Sub
↧