منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
طريقة جمع حقل او عمود في قاعدة بيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=18965)

طريقة جمع حقل او عمود في قاعدة بيانات - محمد بوقزاحة - 26-01-17

ارجوا المساعدة في جمع عمود كالاتي
     ID      VAS     DIIBT
         2          5         1
         9          6        2
         3          5       3



مثلا جمع حقل DIIBT
واظهار الناتج في التكست بوكس

RE: طريقة جمع حقل او عمود في قاعدة بيانات - وائل القطاوي - 26-01-17

تفضل اخي

Dim sum As Integer = 0
For i As Integer = 0 To DataGridView1.Rows.Count - 1
sum += Convert.ToInt32(DataGridView1.Rows(i).Cells(3).Value)
Next
TextBox1.Text = sum.ToString()
حيث ان رقم 3 هو رقم العمود المراد جمعه

RE: طريقة جمع حقل او عمود في قاعدة بيانات - مساعدة - 26-01-17

السلام عليكم

لكل مبرمج طريقة مختلفة في التعامل مع قاعدة البيانات،
لهذا ضع مشروعك لإيجاد الكود المناسب.

RE: طريقة جمع حقل او عمود في قاعدة بيانات - محمد بوقزاحة - 28-01-17

السلام عليكم اخي بارك الله فيك
انا اقصد قاعدة البيانات هل توجد طريقة لجمع حقل

RE: طريقة جمع حقل او عمود في قاعدة بيانات - محمد بوقزاحة - 29-01-17

مشكووووور اخي الفاضل

RE: طريقة جمع حقل او عمود في قاعدة بيانات - 2003amin - 28-08-22

فى معظم قواعد البيانات يوجد سجلات تريد جمعها مثل معرفه مجموع سجل التكلفه او عدد الايام التي عملها الموظف فى الشهر او مجموع المواد الداخله للمخزن فى اليوم ومجموع سعرها واشياؤ كثيره اخري


اولا يجب ان يكوم مشروع الفيجوال بيسك محفوظ فى نفس مكان قاعده البيانات الاكسس

 


Dim db As Database
Dim rs As Recordset
Dim tot As Double

Set db = OpenDatabase(App.Path & "\rate.mdb") 'اسم قاعده البيانات
Set rs = db.OpenRecordset("table name", dbOpenTable) 'اسم الجدول
tot = 0
If rs.RecordCount > 0 Then
   rs.MoveFirst
   While Not rs.EOF()
       tot = tot + rs!record_name 'اسم السجل المراد جمعه
       rs.MoveNext
   Wend
End If

Text1.Text = tot


If rs.RecordCount > 0 Then لو عدد الحقول فى السجل اكبر من صفر اذا
rs.MoveFirst  اذهب للحقل الاول
tot = tot + rs!record_name
 rs.MoveNext
ااجمع الثابت على السجل الاول ثم اذهب للسجل الثاني  
Not rs.EOF()
بشرط الا يكون هذا السجل هو الاخير

RE: طريقة جمع حقل او عمود في قاعدة بيانات - asemshahen5 - 29-08-22

جرب عن طريق الاستعلامات :

مثال عن جمع عامود :

PHP كود :
Select Sum(Column1)as ColSum From TableName 

مثال عن جمع عامود و وضع عامود نصي معه مثل اسم الزبون و الحقل الدفعات :

PHP كود :
Select CastID,CastName,Sum(CastMoney)As Money From TableName Group by CastID,CastName