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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=39656)



هل يوجد كود برمجى او طريقه لعمل هذا فى الداتا جريد فيو - خالد كامل1 - 07-10-21

السلام عليكم احبتى
هل من كود برمجى لطرح او جمع قيمه خليه1 فى صف رقم 1 من خليه رقم 2 من صف رقم 2  فى الداتا جريد فيو 
لتوضيح الفكره





RE: هل يوجد كود برمجى او طريقه لعمل هذا فى الداتا جريد فيو - خالد كامل1 - 08-10-21

ارجو الرد احبتى فى الله


RE: هل يوجد كود برمجى او طريقه لعمل هذا فى الداتا جريد فيو - ابو انس - 08-10-21

وعليكم السلام ورحمة الله وبركاته
تفضل
كود :
Dim aa As Double
       For i As Integer = 0 To dgv.Rows.Count - 1
           dgv.Rows(i).Cells("natij").Value = aa + (Val(dgv.Rows(i).Cells("edafa").Value) - Val(dgv.Rows(i).Cells("khasm").Value))
           aa = Val(dgv.Rows(i).Cells("natij").Value)
       Next



RE: هل يوجد كود برمجى او طريقه لعمل هذا فى الداتا جريد فيو - خالد كامل1 - 08-10-21

(08-10-21, 01:24 PM)ابو انس كتب : وعليكم السلام ورحمة الله وبركاته
تفضل
كود :
Dim aa As Double
       For i As Integer = 0 To dgv.Rows.Count - 1
           dgv.Rows(i).Cells("natij").Value = aa + (Val(dgv.Rows(i).Cells("edafa").Value) - Val(dgv.Rows(i).Cells("khasm").Value))
           aa = Val(dgv.Rows(i).Cells("natij").Value)
       Next

ابو ا تنس يارك الله فيك