Désolé, j'ai testé mais je bute sur un pb.
Dans ce code, la dernière Sub est :
Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click
Dim prtDoc As System.Drawing.printing.PrintDocument = txtRTB1.InitPrint()
prtDoc.Print()
End Sub
Mais txtRTB1 n'existe pas. J'ai essayé avec une string, mais ça plante.
Dans mon cas j'ai un Form CR dans lequel existe un RichTextBox que j'ai appelé RichTextBox1. J'ai aussi un bouton que j'ai appelé btnPrint pour correspondre à cette Sub. Cependant, la fonction InitPrint étant dans une autre Public Class que mon Form CR ça plante encore. J'ai essayé de mettre la fonction InitPrint dans le code du Form CR (Public Class CR) mais je ne peux pas ajouter Inherits Windows.Forms.RichTextBox
Qu'en penses-tu?
Merci