VB用ADO连接数据库,求平均值
如题,请教各位:用ADO连接数据库,想要求某一列的平均值,应该怎么写代码?
小弟是菜鸟,所以还请详细一些。
在某个网站查到可以这样的语句:SELECT AVG(OrderPrice) AS OrderAverage FROM Orders
但是怎么把这个平均值取出来?
谢谢 数据库
[解决办法]
Dim cn As ADODB.Connection, rs As ADODB.Recordset
Set cn = New ADODB.Connection
cn.Open "<你的连接字符串>"
Set rs = cn.Execute("SELECT AVG(OrderPrice) AS OrderAverage FROM Orders")
MsgBox rs!OrderAverage
Set rs = Nothing
cn.Close
Set cn = Nothing