[atef_020]

(15-01-19, 09:11 PM)عبد العزيز البسكري كتب :

السّلام عليكم و رحمة الله و بركاته

بالفورم لود أخي الكريم ..

إذا كان المجموع بالتاكست بدون الإعتماد على رقم الحقل بالداتاجريد ..

كود :

 Dim Dt_Somme As DataTable = Dt_Invoices.Tables("TB1")
       Dim Sum_Column As Integer = Convert.ToInt32(Dt_Somme.Compute("SUM(Total)", String.Empty))
       TextBox1.Text = Sum_Column.ToString

إذا كان المجموع حسب قيم عمود الداتاجريد ..

هنا مثلا .. مجموع العمود رقم 6 ..

كود :

   Public Sub Get_Total_Column()
       On Error Resume Next
       Application.DoEvents()
       Dim WTotal As Decimal = "0.00"
       For Each row As DataGridViewRow In DataGridView1.Rows
           WTotal += row.Cells(6).Value
       Next
       TextBox1.Text = WTotal.ToString
   End Sub

تحياتي

اشكرك اخى الكريم عبد العزيز على الاهتمام .......... ولكن يوجد خطاء فى الكود 

PHP كود :

​ 


PHP كود :

Dim Dt_Somme As DataTable = Dt_Invoices.Tables("TB1") 


فى جزئية Dt_Invoices على الرغم اننى غيرتها لاسم الفوم الموجودة 

PHP كود :

Dim Dt_Somme As DataTable = FrReport.Tables("TB1") 


ولكن الخطاء فى FrReport.Tables