1- إمكانية إضافة اكثر من 1 بالنسبة للكمية وذلك يتم عن طريق النقر على F5
إمكانية حفظ الفاتورة وذلك يتم في جدولين :
الجدول الأول : جدول راسية الفاتورة مثل (رقم الفاتورة - اسم الزبون - تاريخ الفاتورة - إجمالي السعر - قيمة الضريبة المضافة - الإجمالي بعد قيمة الضريبة المضافة .
الجدول الثاني : جدول أصناف الفاتورة .
2- إمكانية تعديل الفاتورة وذلك بحذف أصناف الفاتورة ثم إعادة حفظها .
3- إمكانية حذف الفاتورة من الجدولين بدلالة رقم الفاتورة .
جدول الأصناف والبيانات الموجودة فيه للتجربة ويمكن إضافة أصناف جديدة أو حذفها :
جزاك الله كل خير اخي لكن يوجد ملحوظه صغيرة اثناء التعديل علي الكمية في الفاتورة الجديدة او في التعديل علي فاتورة قديمة مبيسمعش في السعر المفروض مثلا اعدل علي كمية 3 اندومي يضرب الكمية في السعر ويحطها في الأجمالي
(26-04-19, 04:20 AM)MOHAMEDSALEH كتب : جزاك الله كل خير اخي لكن يوجد ملحوظه صغيرة اثناء التعديل علي الكمية في الفاتورة الجديدة او في التعديل علي فاتورة قديمة مبيسمعش في السعر المفروض مثلا اعدل علي كمية 3 اندومي يضرب الكمية في السعر ويحطها في الأجمالي
لم الاحظ هذا الخطأ ..
ممكن شرح تفصيلي كيف ومتى يحدث ؟ وياليت يكون مدعوم بالصور .
05-01-20, 02:04 PM (آخر تعديل لهذه المشاركة : 05-01-20, 02:19 PM {2} بواسطة EYADISMAIL.)
((عسي ان تكون ممنيظلهم الله في ظله يوم لا ظل إلا ظله))
عندي سؤال بارك الله فيك
اريد كود عند اضافة البيانات للداتا قريد فيو .. عند وجود رقم الصنف في الداتا قريد لا يتم تكرار الصنف لكن يقوم باضافة +1 الي الكمية
جربت هذا الكود ما اشتغل
كود :
'For i As Integer = 0 To DataGridView1.Rows.Count - 1
' 'If DataGridView1.Rows(i).Cells(0).Value = TextBox5.Text Then
' ' MsgBox("هذا المنتج موجود مسبقا", MsgBoxStyle.Critical, "تحذير")
' If DataGridView1.Rows(i).Cells(0).Value = DataGridView1.CurrentCell.Value Then
' DataGridView1.Rows(i).Cells(7).Value = (DataGridView1.Rows(i).Cells(7).Value) + 1
For Each row As DataGridViewRow In DataGridView1.Rows
If DataGridView1.Rows(i).Cells(0).Value = DataGridView1.CurrentCell.Value Then
DataGridView1.Rows(i).Cells(7).Value = (DataGridView1.Rows(i).Cells(7).Value) + 1
Exit For
End If
Next
للعلم يتم البحث عن الصنف عن طريق رقم الصنف موجود في حدث TextChanged
يتم اضافة البيانات لقاعدة البيانات ثم الاستعلام لتعبئة الداتا قريد فيو
اريد قبل عملية الاضافة يتاكد من وجود رقم الصنف (اذا وجد) يقوم باضافة (+1) للكمية فقط (بدون كود تعديل) العمل على الداتا قريد فيو
جعله الله في ميزان حسناتك--
Dim x As Integer
For x = 1 To 100
("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox
Next x