+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=39934)
اريد طريقة لجمع عمود في الداتا جريد مع الكسور - بسام محمدغانم - 08-11-21
السلام عليكم
عمود في الداتا جريد رقمي اريد طريقه عند عمل sum للعمود وفيه كسور عشرية يظهر خطاء
ايش نوع المتغير الذي يقبل عملية الجمع مع الكسور
مع العلم جربت متغير من نوع Double ما نفع
RE: اريد طريقة لجمع عمود في الداتا جريد مع الكسور - Anas Mahmoud - 09-11-21
ضع تفاصيل اضافية
رسالة الخطأ والكود المستخدم
RE: اريد طريقة لجمع عمود في الداتا جريد مع الكسور - بسام محمدغانم - 09-11-21
(09-11-21, 02:09 AM)Anas Mahmoud كتب : ضع تفاصيل اضافية
رسالة الخطأ والكود المستخدم
تم حل المشكلة
المشكله من التنسيق في المتغيرات
هذا الكود السابق
كود :
Dim sum_Debtor As Decimal
For Each mRow As DataGridViewRow In DG.Rows
If Not String.IsNullOrEmpty(mRow.Cells("column1").FormattedValue.ToString) Then
If IsNumeric(mRow.Cells("column1").Value) Then
sum_Debtor += Convert.ToInt32(mRow.Cells("column1").Value)
End If
End If
Nextو هذا بعد التصحيح
كود :
Dim sum_Debtor As Decimal
For Each mRow As DataGridViewRow In DG.Rows
If Not String.IsNullOrEmpty(mRow.Cells("column1").FormattedValue.ToString) Then
If IsNumeric(mRow.Cells("column1").Value) Then
sum_Debtor += Convert.ToDecimal(mRow.Cells("column1").Value)
End If
End If
Nextفالتحويل كان ToInt32 بينما كان Decimal
فينتج خطأ عن ذالك التنسيق