[عبدالله الدوسري]

أخوي فراس ، أنت معقد الموظوع كثير , هو أبسط من هذا بكثير .

لطباعة الباركود : الأفضل تطبعة كخط وليس كصورة :
مثال على ما أقصد ولمعرفة الفرق :



جرب غير الأكواد كما هي موظحة هنا :

كود :

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       prnDialog.Document = prntDoc
       If prnDialog.ShowDialog = DialogResult.OK Then
           prntDoc.Print()
       End If
   End Sub
   Private Sub prntDoc_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles prntDoc.PrintPage
       e.Graphics.DrawImage(Me.PictureBox1.Image.Clone, 0, 0)
       e.HasMorePages = False
   End Sub

هذا مشروع كمثال جرب بنفسك :

   


لاحظ هنا عند الطباعة كنص : 
   
طباعة الباركود على شكل نص  :  الباركود واضح ( حتى لو قمت بالتكبير عشرات المرات ) ستظل الخطوط حادة
   



لاحظ هنا عند الطباعة كصورة : 
   
طباعة الباركود على شكل صورة : من البداية واضح أن الباركود مضبب وغير واضح.
   

ملف المشروع :

  BarcodeExample.rar (الحجم : 77.7 ك ب / التحميلات : 585)