منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

عندي عمود في الداتا جريد طبعا من نوع عملة وفيه اسعار سلع مثلا :

10.55
8.60
5.05

استخدم كود لجمع قيمة العمود ثم اظهارها في التكست بوكس هذا الكود الي استخدمه

 Dim sum As Integer = 0
        For i As Integer = 0 To dgv_data.Rows.Count - 1
            sum += Convert.ToInt32(dgv_data.Rows(i).Cells(6).Value)
        Next
        T2.Text = sum.ToString()
لاكن المشكلة ان عملية الجمع تتم بدون الكسور يعني الهلالات يعني مثلا

10.50 + 2 = 13.50
يعطيني 13 فقط واذا كانت اكثر من 50 هللة يكمل عليها واحد يعني 

10.80 + 2 = 12.80
يعطيني 13

السلام عليكم

جرب تغير نوع المتغير  من  

استبدل  

 Dim sum As Integer = 0

ب

نفس المشكلة

Convert.ToDouble

---

استبدل هذه
Convert.ToInt32

الله يعطبك العافية مشكور

(26-11-17, 02:04 PM)VB.NET كتب : [ -> ]عندي عمود في الداتا جريد طبعا من نوع عملة وفيه اسعار سلع مثلا :

10.55
8.60
5.05

استخدم كود لجمع قيمة العمود ثم اظهارها في التكست بوكس هذا الكود الي استخدمه

 Dim sum As Integer = 0
        For i As Integer = 0 To dgv_data.Rows.Count - 1
            sum += Convert.ToInt32(dgv_data.Rows(i).Cells(6).Value)
        Next
        T2.Text = sum.ToString()
لاكن المشكلة ان عملية الجمع تتم بدون الكسور يعني الهلالات يعني مثلا

10.50 + 2 = 13.50
يعطيني 13 فقط واذا كانت اكثر من 50 هللة يكمل عليها واحد يعني 

10.80 + 2 = 12.80
يعطيني 13

جرب هذا السطر :