VB用ADO连接数据库，求平均值

Question

如题，请教各位：用ADO连接数据库，想要求某一列的平均值，应该怎么写代码？
小弟是菜鸟，所以还请详细一些。
在某个网站查到可以这样的语句：SELECT AVG(OrderPrice) AS OrderAverage FROM Orders
但是怎么把这个平均值取出来？
谢谢数据库

Answer 1

http://download.csdn.net/detail/veron_04/1644211

Answer 2

Dim cn As ADODB.Connection, rs As ADODB.RecordsetSet cn = New ADODB.Connection
cn.Open "<你的连接字符串>"Set rs = cn.Execute("SELECT AVG(OrderPrice) AS OrderAverage FROM Orders")
MsgBox rs!OrderAverageSet rs = Nothing
cn.Close
Set cn = Nothing

Answer 3

谢谢，就是这一句      MsgBox rs!OrderAverage