bonjour,
pour imprimer une étiquette de code barre j'ai utiliser ce code :
Mais j'ai pas d'imprimante de code barre pour tester ni une douchette ,alors ma question c'est:est ce que ce code sera exécuter correctement lorsque je lancerai l'impression ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 private sub Imprimer_click() addHandler printdocument1.PrintPage , addressOf me.imprimerEtiquette printDocument1.Print end sub Sub ImprimerEtiquette(sender as integer,Ev as printing.PrintPageEventArgs) dim PictureBox1 as new pictureBox pictureBox1.Image=New System.Drawing.Bitmap(100,100) dim h as system.drawing.graphics=new system.drawingGraphics.fromImage(PictureBox1.image) h.drawString(LabelCodeBarre.Text,new font("3Of 9 BarCode",24),Brushes.Black,12,12) h.drawstring(txtCodeArticle.text,new font("Arial",8,FontStyle.Regular),Brushes.Black,10,35) end sub
ps:j'ai utiliser un caractère de police spécifique pour le code barre
Partager