我正在嘗試從資料網格中回圈某些列和行，對這些行求和并將它們顯示在圖表上。
我可以使用以下代碼一一計算行總和：
Dim sum = (From row As DataGridViewRow In dgvData.Rows.Cast(Of DataGridViewRow)()
Select CDec(row.Cells(5).Value)).Sum
X = sum.Tostring
然后我在圖表中手動寫入列名
Me.Chart1.Series("Repairs").Points.AddXY("Unit Count", x)
我可以做行總和回圈
For i As Integer = 5 To 15
Dim sum = (From row As DataGridViewRow In dgvData.Rows.Cast(Of DataGridViewRow)()
Select CDec(row.Cells(i).Value)).Sum
Me.Chart1.Series("Repairs").Points.AddXY("Unit Count", (sum.ToString))
Next
但我不知道如何閱讀列標題
我不知道如何寫一個回圈
查看列標題 5-15 保存它們的名稱 (col)
將這些值回圈到
Me.Chart1.Series("Repairs").Points.AddXY("col", sumOFrows)
任何幫助將不勝感激
uj5u.com熱心網友回復：
您是否嘗試先對行求和，將結果保存在列中，然后對“列結果”求和？抱歉，我對這個問題不是 100% 確定
uj5u.com熱心網友回復：
讓它像這樣作業：
Dim ids = New List(Of Integer)({5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26})
For Each id In ids
Dim sum = (From row As DataGridViewRow In dgvData.Rows.Cast(Of DataGridViewRow)()
Select CDec(row.Cells(id).Value)).Sum
Dim fetchdgvheaders(dgvData.Columns.Count) As String
fetchdgvheaders(id) = (dgvData.Columns(id).Name)
Me.Chart1.Series("Repairs").Points.AddXY((fetchdgvheaders(id)), (sum.ToString))
Next
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/366499.html
上一篇：或者函式只看第一個值