Private Sub pd_Print(ByVal sender As Object, ByVal e As PrintPageEventArgs) Handles pd.PrintPage

        Using img As Image = _images.Item(_images.Counter) '_images è una collection delle pagine da stampare

            e.Graphics.ScaleTransform(_scaleperc / 100, _scaleperc / 100)
            e.Graphics.DrawImage(img, 0, 0)

            If _images.Counter < _images.Count - 1 Then
                e.HasMorePages = True
                _images.Counter += 1
            End If
        End Using

    End Sub