+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] System.InvalidCastException (/showthread.php?tid=32328)
الصفحات:
1
2
RE: اخوكم من مصر عمرو - 3booody - 03-12-19
السلام عليكم ورحمة الله وبركاته
ان شاء الله يكون هذا طلبك ؟
كود :
Dim arr = From n As DataGridViewRow In DataGridView1.Rows Select CDbl(n.Cells(10).Value)
Dim D As Double = 0
For Each n As Double In arr
D += n
Next
TextBox1.Text = DRE: اخوكم من مصر عمرو - amrmosa673@gmail.com - 04-12-19
(03-12-19, 07:42 PM)kiki كتب : عمود id = 0اسم الاداء عندي DataGridView نفس اللي موجوده في الكود
عمود الرقم = 1
عمود الاسم = 2
عمود التاريخ = 3
عمود نوع النشاط = 4
......... الى
عمود ملاحظات = 12
بينما لما تعد هتوصل بالعد ان عمود الملاحظات هو 13
وبما اننا قلنا الملاحظات 12 لو رجعنا بالعد بعدد 2 عمود هيكون عمود المدفوع = 10
وبما انك لست على دراية بالكود وانه تم اخذ الكود كا نسخ ولصق من شخص ما
فهنا يعنى بان الاداء DataGridView قد تكون اسمها مختلف مثل DataGridView1 أو اسم اخر قمت انت بتسميته
فالكود التالى ساقوم بوضع لو على كلمة باللون الاحمر كل ما عليك هو استبدال هذه الكلمة باسم الاداء لديك
إقتباس :TextBox1.Text = DataGridView.Rows.Cast(Of DataGridViewRow).Sum(Function(t) Val(t.Cells(10).Value))المتبقي الان هو التاكد من اسم الاداء طبقاً لما هو مشار اليه باللون الاحمر
وكذلك عليك التاكد بان ليس هناك اعمدة مخفية لم توضح بالصورة لان المخفي يجب ان يحتسب فى العد
RE: اخوكم من مصر عمرو - عبد العزيز البسكري - 04-12-19
غير معقول أن يكون الاسم هكذا بهذه الكلمة بالذات .. قد يكون مثلا
DataGridView1