Merci Zermelo pour ton aide car votre solution d'imprime écran pourra éventuellement me servir dans d'autre cas, cependant voila un code très simple et qui marche nickel
'Veuillez insérer le code dans le bouton imprimer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
'PrintForm1.PrintAction = Printing.PrintAction.PrintToPrinter
'' PrintForm1.Print()
PrintDocument1.PrinterSettings.Copies = 1
PrintDocument1.Print()
Me.Hide()
Timer1.Stop()
End Sub
et pour ajuster les objets à imprimer
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.DrawString(Label1.Text, Label1.Font, Brushes.Black, 100, 50)
e.Graphics.DrawString(agenceLabel.Text, agenceLabel.Font, Brushes.Black, 100, 100)
e.Graphics.DrawString(Label2.Text, Label2.Font, Brushes.Black, 50, 200)
'e.Graphics.DrawString(NavireLabel.Text, NavireLabel.Font, Brushes.Black, 100, 100)
'e.Graphics.DrawString(trajetLabel.Text, trajetLabel.Font, Brushes.Black, 100, 150)
'e.Graphics.DrawString(datevoyageLabel.Text, datevoyageLabel.Font, Brushes.Black, 100, 200)
End Sub