VB用ADO连接数据库,求平均值,该如何解决

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