+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=28793)
كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - alfaiz678 - 27-02-19
السلام عليكم
اريد كود جمع عمود داتا جريد به قيمة فارغة وتجاوز رسالة الخطأ
وتحويل الصف الفارغ الى قيمة صفر إن أمكن
لنفترض ان صفوف العمو (1.2. .4)
RE: كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - حريف برمجة - 27-02-19
وعليكم السلام ورحمة الله وبركاته ،،
العمود الأول = Cells(0)
العمود الثاني = Cells(1)
..... وهكذا
كود :
TextBox1.Text = (From row In dg1.Rows Select CDbl(Val(row.Cells(0).Value))).Sum()RE: كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - alfaiz678 - 01-03-19
(27-02-19, 09:37 PM)حريف برمجة كتب : وعليكم السلام ورحمة الله وبركاته ،،
العمود الأول = Cells(0)
العمود الثاني = Cells(1)
..... وهكذا
كود :
TextBox1.Text = (From row In dg1.Rows Select CDbl(Val(row.Cells(0).Value))).Sum()
جزاك الله خيرا اخي
لو تعديل بسيط اخي
والعفو
يعني ممكن جمع بيانات في الداتا جريد فيو لعمود بشرط عمود اخر
كما في الصورة
اريد اجمالي العمود 0
بحيث ان العمود واحد = نقدا
لا اريده يجمع لي الاجل
الصورة المرفقة
RE: كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - حريف برمجة - 01-03-19
العفو ،،
كود :
Dim cash = DataGridView1.Rows.Cast(Of DataGridViewRow).
Where(Function(row) CStr(row.Cells(1).Value) = "نقدا").
Select(Function(row) CDbl(Val(row.Cells(0).Value))).Sum()
MsgBox(cash)RE: كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - alfaiz678 - 01-03-19
ماشاء الله
جزاك الله خيرا
ماقصرت
RE: كيفية جمع عمود داتا جريد به قيمة فارغة وتجاوز الخطأ - حريف برمجة - 01-03-19
بالتوفيق للجميع