[mr_hso]

(01-08-19, 03:53 PM)mr_hso كتب : السلام عليكم 
اعزكم الله وحفظكم

لدى قاعدة بيانات فيها عمود للسعر
ولدى فورم اود تقسيم الاسعار فيه الى 3 فئات 
50
100
اخري

---المطلوب---
اريد كود يظهر لي فى TeXTBOX1عدد القيم التى = 50   وفي TEXTBOX2   مجموع القيم التى تساوي 50
ريد كود يظهر لي فى TeXTBOX3عدد القيم التى = 100   وفي TEXTBOX4   مجموع القيم التى تساوي 100
وكذلك القيم التى لا تساوى 50  او  100  يظهر عددها فى TEXTBOX5  ومجموعها فى  TEXTBOX6

اتمنى ان اجد الحل لديكم كما تعودت منكم
شكرا لكم

سبحان الله وبحمده ... سبحان الله العظيم

الحمد لله تم التوصل الى الكود وهو كالتالي

كود :

 Dim OverallTotal As Double
       For Each dgvRow As DataGridViewRow In DataGridView1.Rows
           If Not dgvRow.IsNewRow Then
               If CDbl(dgvRow.Cells(5).Value) = 50000 Then
                   OverallTotal += CDbl(dgvRow.Cells(4).Value)
               End If
           End If
       Next
       TextBox33.Text = OverallTotal
       TextBox33.Text = CDbl(TextBox33.Text).ToString("n2")

حيث ان cells 5  هى التى سيتم البحث عنن القيم فيها
و cells 4  هى التي سيتم تجميع مبالغه

و  TextBox33 هو الذي سيظهر فيه الناتج





المطلوب 
هل يستطيع احد اضافة  if  اخري للمعادلة لاضافة شرط جديد



وشكرا