Datagrid：计算页脚中列的平均值或总和

Posted 2023-02-22

【中文标题】Datagrid：计算页脚中列的平均值或总和

【英文标题】：Datagrid: Calculate Avg or Sum for column in Footer

【发布时间】：2010-09-05 18:46:34

【问题描述】：

我有一个绑定到数据集的数据网格，我想在页脚中显示填充整数的列的平均结果。

按照我的想法，我可以想到两种方法：

1.“使用来源，卢克” 在我调用 DataGrid.DataBind() 的代码中，使用 DataTable.Compute() 方法（或在我的情况下为 DataSet.DataTable(0).Compute()）。例如：

Dim strAverage = DataTable.Compute("Avg(ColumnName)", "")  

但是一旦我有了这个，我怎么能把它插入到页脚中呢？

2.“为荣耀而战” 使用 DataGrid.ItemDataBound 事件，计算每个 ListItemType.Item 和 ListItemType.AlternatingItem 的总和，最终显示在 ListItemType.Footer 中。例如：

Select Case e.Item.ItemType
    Case ListItemType.Item, ListItemType.AlternatingItem
        runningTotal += CInt(e.Item.Cells(2).Text)
    Case ListItemType.Footer
        e.Item.Cells(2).Text = runningTotal/DataGrid.Items.Count
End Select

这感觉不对，而且我必须确保在每个 DataBind 上重置 runningTotal。

有没有更好的办法？

【参考方案1】：

我不知道是否一定更好，但有两种替代方法：

点击页脚后手动遍历表格并根据屏幕上的文本进行计算 手动检索数据并独立于绑定进行计算

当然，#2 抵消了数据绑定的优势（假设您正在这样做）。

【参考方案2】：

谢谢DannySmurf，你的第一个回答让我明白了。 （为什么我们总是寻找那个神奇的解决方案？）。

作为参考，这是我最终做的：（警告：下面的 VB，可能没有包含足够的分号）

Case ListItemType.Footer
    e.Item.Cells(0).Text = "Average"
    For i As Integer = 3 To 8
        Dim runningTotal As Integer = 0
        For Each row As DataGridItem In DataGrid.Items
            If IsNumeric(row.Cells(i).Text) Then
                runningTotal += CInt(row.Cells(i).Text)
            End If
        Next
    e.Item.Cells(i).Text = Math.Round(runningTotal / DataGrid.Items.Count, 0)
    Next
End Select

我需要为几列（因此是 3 到 8 列）做这件事，这也是我寻找神奇解决方案的最终原因。