+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=39408)
إضافة سطر في آخر الداتا جريد - aftfm - 28-08-21
السلام عليكم ورحمة الله وبركاته
هل من الممكن اضافة سطر آخير في الداتاجريد فيو
ليظهر فيه ناتج جمع العمود كاملا
كود :
Dim SUM as Integer=0
For i as Integer =0 to DataGridView1.Rows.Count()-1 Step +1
SUM = SUM + DataGridView1.Rows(i).Cells(1).Value
Next
TextBox1.Text= SUM.ToString()هذا الكود يظهر ناتج جمع العمود 0
ولكن تم وضعه في مربع نص
والمطلوب اضافة سطر في نهاية الداتاجريد لوضع الناتج فيه تحت كل عمود
للتوضيح الداتا جريد
مرتبطة ببيانات من قاعدة بيانات اكسس
RE: إضافة سطر في آخر الداتا جريد - ابراهيم ايبو - 30-08-21
السلام عليكم ورحمة الله وبركاته
اخي الكريم لست بحاجة الى صف في اخر الداتاغرايد لوضع المجموع (لا اعلم ان بالامكان عمل ذلك مع اداة Datagridview الموجودة في فيجوال ستوديو) ولكن الافضل ان تضع Label خارج الداتاغرايد اسفل كل حقل تريد جمعه عن طريق دالة Sum لتظهر لك المجموع
RE: إضافة سطر في آخر الداتا جريد - boudyonline - 31-08-21
اخي الفاضل مرفق بالرسالة برنامج صغير اعددته خصيصا لطلبك
ارجو ان يكون فيه الفكرة المطلوبة وأن يساهم في حل مشكلتك
مع خالص تحياتي ....
RE: إضافة سطر في آخر الداتا جريد - a7med saba - 31-08-21
If i = DataGridView1.Rows.Count then
Exit for
' إذا كنت تريد إضافة الصف إلى نهاية الشبكة ، فاستخدم طريقة Add () لمجموعة الصفوف ...
DataGridView1.Rows.Add(New String(){sum.tostring, value2, value3})
وتستطيع إضافة قيم أخرى لتعبئة الخلايا الأخرى value2 و value3
ويمكن جعل الصف الاخير غير مرئي من خلال كتابة اكواد تخص استايل الحقل الاخير بأن تكون الحقول المجاورة لها ذات حدود و لون خلفية مطابق للون datagridview.background
اتمنى اني قدرت افيدك بالفكرة .. وكنت اتمنى ان يكون دخولي للمنتدى من الكمبيوتر لطرح الفكرة بشكل اوضح
RE: إضافة سطر في آخر الداتا جريد - aftfm - 31-08-21
اخي العزيز boudyonline
بارك الله فيك
والف شكر والشكر موصول لجميع الاخوة