السلام عليكم
الأمر سهل جدا
أنا عملت لك مثال على السريع
مع أني تركت البيسك حاليا ولا أستخدمها
شوف :
لنفرض مثلا عندنا داتا جريد فيوو فيها 3 أعمده ومجموعه لا محدوده من السطور
وعايزين نجمع الأعمده في سطر منفصل في أخر سجل للجريدفيوو
أنا عملت هنا 3 أعمده
الأول للمنتج
التاني للشراء
التالث للأرباح
وجمعتهم وأظهرتهم في سجل منفصل في اخر الجريدفيوو وكمان تم تلوين السطر بلون مختلف حتى يكون واضح لك .
وكمان رقمت لك السطور
الأمر سهل جدا
أنا عملت لك مثال على السريع
مع أني تركت البيسك حاليا ولا أستخدمها
شوف :
لنفرض مثلا عندنا داتا جريد فيوو فيها 3 أعمده ومجموعه لا محدوده من السطور
وعايزين نجمع الأعمده في سطر منفصل في أخر سجل للجريدفيوو
أنا عملت هنا 3 أعمده
الأول للمنتج
التاني للشراء
التالث للأرباح
وجمعتهم وأظهرتهم في سجل منفصل في اخر الجريدفيوو وكمان تم تلوين السطر بلون مختلف حتى يكون واضح لك .
وكمان رقمت لك السطور
PHP كود :
Public Class Form1
Sub CreateGrd()
With DataGridView1
.ColumnCount = 3
.Columns(0).HeaderText = "Product"
.Columns(1).HeaderText = "Cost Pice"
.Columns(2).HeaderText = "Profit"
End With
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
CreateGrd()
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim TotalCostPrice As Integer = (From rr As DataGridViewRow In DataGridView1.Rows _
Select CInt(rr.Cells(1).Value)).Sum()
Dim TotalProfie As Integer = (From rr As DataGridViewRow In DataGridView1.Rows _
Select CInt(rr.Cells(2).Value)).Sum()
DataGridView1.Rows.Add(New String() {"Total", TotalCostPrice, TotalProfie})
For Each r As DataGridViewRow In DataGridView1.Rows
r.HeaderCell.Value = (r.Index + 1).ToString()
If r.Cells(0).Value = "Total" Then
r.DefaultCellStyle.ForeColor = Color.White
r.DefaultCellStyle.BackColor = Color.Black
End If
Next
End Sub
End Class

