منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
توليد ارقام باركود عشوائية - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : توليد ارقام باركود عشوائية (/showthread.php?tid=38037)



توليد ارقام باركود عشوائية - muaamar - 15-03-21

السلام عليكم.عندي برنامج مبيعات اريد توليد ارقام باركود مكونة من 9 ارقام ولكن المشكلة في توليد ارقام جديدة غير مخزنة مسبقا.انا بشتغل بالفيجوال بيسك دوت نيت وقاعدة البيانات سيكوال سيرفر


RE: توليد ارقام باركود عشوائية - Bibo2030 - 16-03-21

اجعل الباركود مكون من التالى
كود الصنف
و كود كارت الصنف
و العام الحالى
و يتم تنفيذ ذلك من داخل الكود بكل سهوله

txtTemp.Text = txtCode.Text & cmbCode.Text & Now.Date.DayOfWeek & Now.Date.DayOfYear & My.Computer.Clock.LocalTime.Year "
If txtTemp.TextLength > 9 Then
Dim i As Integer = 9 - txtTemp.TextLength
txtBarcode.Text = Mid(txtTemp.Text, 1, 9)
End If