如何从vb.net中的Access数据库获取平均记录?

时间:2015-08-25 13:19:13

标签: vb.net

我有一个项目,我通过DataGridView连接Access数据库。我根据用户通过文本框和组合框输入的信息进行了一些查询。现在我需要找到一种方法来计算从一个特定列查询后找到的记录的平均值。有没有办法做到这一点?

1 个答案:

答案 0 :(得分:0)

存储查询中的计数......

Dim lstCounts As New List(Of Integer)

'Your database retrieval method: SELECT COUNT(*) FROM table WHERE field = 'Blah'
lstCounts.Add(<above result>)

'Your database retrieval method: SELECT COUNT(*) FROM table WHERE field = 'Blah1'
lstCounts.Add(<above result>)

'Your database retrieval method: SELECT COUNT(*) FROM table WHERE field = 'Blah2'
lstCounts.Add(<above result>)

'etc.

找到平均值......

Dim nTotal As Integer = 0
Dim dAverage As Decimal = 0.0

For i As Integer = 0 to lstCounts.Count - 1
    nTotal += lstCounts(i)
Next

'Make sure you aren't dividing by zero
If lstCounts.Count > 0
    dAverage = nTotal / lstCounts.Count
End If

您也可以简单地在执行每个查询时添加总计,而不是使用List,但是您需要跟踪您运行的查询数量。