badboy38
Messages postés95Date d'inscriptionvendredi 14 janvier 2005StatutMembreDernière intervention 4 mars 2013
-
4 juil. 2006 à 12:55
scottmat
Messages postés438Date d'inscriptionsamedi 24 mai 2003StatutMembreDernière intervention23 janvier 2011
-
4 juil. 2006 à 14:53
Bonjour,
voici le code que j'utilise (trouvé dans le forum):
Try
PrintDocument1.DefaultPageSettings = printpagesettings
stringtoprint = RichTextBox1.Text
PrintPreviewDialog1.Document = PrintDocument1
PrintPreviewDialog1.ShowDialog()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
problème: le compilateur m'indique 2 erreurs:
"le nom printpagesettings n'est pas déclaré"
"le nom stringtoprint n'est pas déclarer"
si j'ajoute Dim
printpagesettings et Dim
stringtoprint, il me dit: "la variable printsettings est utilisée avant qu'une valeur ne lui soit assignée. Une exception de référence null peut se produire au moment de l'execution."
badboy38
Messages postés95Date d'inscriptionvendredi 14 janvier 2005StatutMembreDernière intervention 4 mars 2013 4 juil. 2006 à 13:46
il faut remplacer les xxxxxx par Printing.PageSettings
autre problème: j'ai toujours une page blanche
Dim printpagesettings As New Printing.PageSettings
Dim stringtoprint
Try
PrintDocument1.DefaultPageSettings = printpagesettings
stringtoprint = RichTextBox1.Text
PrintPreviewDialog1.Document = PrintDocument1
PrintPreviewDialog1.ShowDialog()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try