Bonjour,
Je dois sûrement avoir fait une erreur de «débutante» en POO sous VB.NET, ou encore il me manque un détail en ce qui concerne l'impression... Je désire spécifier que je ne veux pas qu'on débugge mon code pour moi sans rien faire de mon côté, mais je cherche une piste pour me dire où regarder pour tenter corriger le tout. J'ai créé une classe qui hérite de la classe PrintDocument, afin de formater le gabarit de ce qui sera une fiche descriptive tenant sur une page standard.
Et j'ai créé sur un Form un bouton qui s'occupe (pour commencer) de lancer l'impression, avec le code suivant:
La boîte de dialogue s'affiche, je clique OK pour lancer, mais je tombe dans le Catch ci-dessus et l'imprimante sort une page blanche. Le message d'erreur est:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub btnAffiche85x11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAffiche85x11.Click Try Dim prnDialog85x11 As New PrintDialog Dim affiche85x11 As New Affiche85x11 prnDialog85x11.Document = affiche85x11 If prnDialog85x11.ShowDialog() = Windows.Forms.DialogResult.OK Then affiche85x11.Print() affiche85x11.Dispose() ' Une fois que c'est imprimé ?? End If Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub
Je me demande si ça vient du code ci-dessus (c'est-à-dire le code du bouton) ou du code dans le fichier .vb qui renferme la classe (voir le fichier ci-joint - pour le moment je n'ai que le code pour dessiner un rectangle vert forêt, et la classe est sûrement incomplète).L'objet est actuellement utilisé ailleurs.
Partager