السلام عليكم ورحمة الله
في المثال المرفق تجد برنامج لطباعة لاصقات الباركود والمفروض انه مصصم لطباعة أي عدد من اللاصقات حسب تحديد المستخدم لعدد نسخ الباركود
لكنه للاسف لا يقوم بطباعة العدد المدخل ويقوم فقط بطباعة لاصقة واحدة
برجاء تعديل الكود ليقوم بعمل تعدد للاصقات الباركود عند الطباعة
ملاحظة : لا تنسى تثبيت الخط المرفق حتى يظهر الباركود
مختار أحمد
موقع الويب : http://www.luxorsystems.com
منتدياتنا :http://www.luxorsystems.com/forum/index.php
للمراسلة
luxorsystems@hotmail.com
للاتصال التليفوني
00201228085123
السلام عليكم
قم بتغيير كود الطباعة إلى
Dim EncodedText, Txt As String Txt = TextBox1.Text EncodedText = bar.Code39(Txt) 'define font Name and size TextFont = "IDAutomationHC39M" TextFontSize = 10 PageNo = Me.Nupdown.Value For x As Integer = 1 To PageNo bar.PrintBarCodeV(TextFont, EncodedText, TextFontSize) Next
منحة للخريجين وطلاب الجامعات و المعاهد
دبلومة لتخريج مبرمج متخصص في هندسة صناعة البرمجيات وتصميم وبرمجة تطبيقات الأنترنت
سبحان الله وبحمده سبحان الله العظيم
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…