+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] مصمم با الفيجول بيسك 2012 (/showthread.php?tid=32797)
مصمم با الفيجول بيسك 2012 - مروان العليانى - 04-01-20
السلام عليكم ورحمة الله
لدية فاتورة بيع والديه مخزان اريد شفرة تكون اذ كان الكمية كافية فى المخزان يتم الحفظ واذ كان غير كافية تظهر رسائلة تخبرنا ان الكمية لتكفي
RE: مصمم با الفيجول بيسك 2012 - عبد العزيز البسكري - 04-01-20
السّلام عليكم و رحمة الله و بركاته
أخي مروان ..
إذا كانت كمّية المخزون تظهر على الداتاجريد الخاصّة بالفاتورة
تعمل مقارنة بين العمودين : عمود الكمّية و عمود المخزون
إذا كانت قيمة عمود الكمية أكبر من قيمة عمود المخزون .. يتم الخروج من كود الحفظ برسالة توضيحية
إذا كانت كمّية المخزون ليس لها عمود بداتا جريد الفاتورة
إعمل تاكست بكس و كلما تختار صنف يتم إظهار كمّية مخزونه
و تقارن بين كمية الصنف المباعة مع التاكست بوكس
مثال للنقطة الأولى :
كود :
For I As Integer = 0 To DataGridView1.Rows.Count - 1
If DataGridView1.Rows(I).Cells(4).Value > DataGridView1.Rows(I).Cells(3).Value Then
MessageBox.Show("كمّية المخزون لا تكفي لإتمام عملية الحفظ", "رسالة تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
Nextتحياتي