Ho trovato questo codice ma sinceramente non funziona
Seconso voi ov'è l'errore?


Scegliere Codice dal menu Visualizza, quindi incollare o digitare il seguente codice:

Option Compare Database
Option Explicit

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Me!txtImageNote = DisplayImage(Me!ImageFrame, Me!txtImageName)
End Sub