如何得到数据库中数据的最大值、最小值、平均值
编号:QA000494
建立日期: 1999年2月8日 最后修改日期:1999年2月8日
所属类别:
gia:
VB5 、 VB6
WIN 95 、 WIN NT
请问:如何得到数据库(.mdb)某个表中数据的最大值、最小值、平均值,这个表的所有数据结构都是文本的,因为是文本的,所以查询结果 9就比 10 大,由于数据量很大,而且有很多程序共享这个数据库,所以数据结构无法改变,谢谢。
回答:
求统计量可以使用SQL的Max、Min、Avg等函数。你可以使用Val将文本转换位数字。如
Dim dbs As Database, rst As Recordset
Set dbs = OpenDatabase("mydb.mdb")
Set rst = dbs.OpenRecordset("SELECT " _
& "Min(Val(Freight)) AS [Low Freight], " _
& "Max(Val(Freight))AS [High Freight] " _
& "FROM Orders WHERE ShipCountry = 'UK';")
这样rst.Fields("Low Freight")就是最小值,而rst.Fields("High Freight")就是最大值。
此问题由李海回答。
| |
|
|
| |
|
|