printing picturebox to the default printer

[sal21]

i can have a series of picturebox on a form.
how to print to the default printer, maintain the actually position.
naturally only a picturebox witht the name named pic1,pic2,picxx

MY TEST CODE:

Private Sub PRINT_PICTUREBOX()

    Dim myitem As Control

    For Each myitem In Me.Controls
        If TypeOf myitem Is PictureBox Then
            If Left(myitem.Name, 3) = "PIC" Then '<<<< peraphs here the print code?t
        End If
    Next
End Sub

 

[strongm]

> i can have a series of picturebox on a form

Is this still your lotto project? And your insistence on overlaying various additional pictureboxes to show the selections?

Despite my favour for the mshflexgrid solution (really, so much easier for a whole bunch of reasons), my solution in https://www.tek-tips.com/threads/copy-and-paste-picture-box.1834258/post-7589882 to printing out the betting slip is agnostic as to how the betting slip is drawn - and so should work for any solution that has the bare betting slip in the background of any control that can hold an image and then draws on top of it

Another alternative is a simple MyForm.PrintForm - with perhaps some adjustment to only show the pictures you want printed