代码之家 › 专栏 › 技术社区 › Mark Glorie

数据报:计算页脚中列的平均值或总和

report datagrid vb.net asp.net

Mark Glorie · 技术社区 · 17 年前

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

我认为有两种方法:

1、“使用来源 “卢克”
在我调用datagrid.databind()的代码中,使用dataTable.compute()方法( 或者在我的例子中,dataset.datatable(0.compute()) )例如:

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

但是一旦我有了这个,我怎么能把它插入页脚呢?

2。界为了荣耀
使用datagrid.itemdatabound事件,并从每个listemtype.item和listemtype.alternatingitem计算一个运行总数,最后显示在listemtype.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

这只是感觉错误,而且我必须确保在每个数据绑定上重置runningtotal。

有更好的方法吗?

2 回复 | 直到 13 年前

TheSmurf 17 年前

我不知道哪一个更好,但是两个 交替的 方法是:

点击页脚后手动浏览表格,并根据屏幕上的文本进行计算。
手动检索数据并与绑定分开进行计算

当然,2可以抵消数据绑定的优势(假设这就是您要做的)。

Community Mohan Dere 9 年前

谢谢 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列)做这个,最终为什么我要寻找神奇的解决方案。

推荐文章

Joanne Jeow · 为什么我的柱状图对我想要显示的每个类别都显示100%?

2 年前

scriptTease · 如何正确导出CSV以获取邮件结果?

2 年前

Para · pgsql-返回包含多行数据的行

2 年前

siwa86 · 如何在rdlcreport/report-viewer中使页眉只出现在第一页上,而在vb.net中信息页眉仍然显示在每一页上

2 年前

Kan_IT · 命名空间不能直接包含字段或方法等成员,并且T4运行时文本模板vb.net中未定义“ReportTemplate”

2 年前

Skywalker · 如何访问GoDaddy上存储在虚拟机中的数据?

2 年前

user18 · 如何在VB.NET中使用数据表将行新对象添加到字符串(“C2”)中进行报告

3 年前

cake2244 · 安装tensorflow R studio

3 年前

chip · 从BI服务器中的报告结果触发转换

12 年前

user1399217 · 隐藏出生报告上的摘要列

13 年前