>In form Load event put code: > ' initial settings > With Me.ctlImageEdit.Object > .AutoRefresh = True > .SelectionRectangle = False > .ScrollShortcutsEnabled = True > .DisplayScaleAlgorithm = wiScaleOptimize ' 4 > .ImagePalette = wiPaletteGray8 ' 2 - I don't work with colors. > End With > > ' variable strFullFileName contains the full file name (with path). You > ' can use UNC here. > ' We start from the first page. > With Me.ctlImageAdmin.Object > .Image = strFullFileName > .PageNumber = 1 > End With > > With Me.ctlImageEdit.Object > .Image = Me.ctlImageAdmin.Object.Image > .Page = 1 > .Display ' display the image > End With > >In Click event of cmdPrint put the code: > > With Me.ctlImageEdit.Object > nFromPage = .Page > nToPage = .Page > nHowToPrint = 2 ' 0 -Pixel to pixel, 1 -Inch to inch (default), 2 -Fit to page > bPrintAnnotation = True > .PrintImage nFromPage, nToPage, nHowToPrint, bPrintAnnotation > End With >' Note: PrintImage method has several more parameters, which I don't use. >>