+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (https://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (https://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (https://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : [VB.NET] عرض الكود بار (/showthread.php?tid=14394)
عرض الكود بار - djelloul - 15-01-16
السلام عليكم ورحمة الله تعالى وبركاته
يا أساتذة رجاءا هل عناك أداة معينة لعرض الباركود كشيفرة هل أستعمل PictureBox أم TextBox أم هناك أداة معينة لدلك أرجوا الإفادة من فضلكم وربي يجازيكم خيرا
RE: عرض الكود بار - boudyonline - 15-01-16
هل تقصد عمل QR كود ؟
Generate Compatible QR Code Barcode
كود :
Dim qr_code As New QRCode()
' Set QR Code barcode data
qr_code.Data = "(6221)06789900799"
' Set QR Code data mode
qr_code.DataMode = QRCodeDataMode.Auto
' Set QR Code to be GS1 Compatible
qr_code.FNC1 = FNC1.FNC1_1ST_POS
' Set QR Code barcode size;
qr_code.UOM = UnitOfMeasure.PIXEL
qr_code.X = 4
qr_code.LeftMargin = 16
qr_code.RightMargin = 16
qr_code.TopMargin = 16
qr_code.BottomMargin = 16
' Save created QR Code to png file format
qr_code.ImageFormat = System.Drawing.Imaging.ImageFormat.Png
qr_code.drawBarcode("C:\vb-net_qr_code.png")RE: عرض الكود بار - djelloul - 15-01-16
السلام عليكم ورحمة الله تعالى وبركاته
شكرا لكم أخي الكريم على تفاعلكم وردكم السريع فقط لو تتكرم وتتفضل بشرح الكود
ألف شكر لكم