vb+ACCESS - VB / 数据库(包含打印，安装，报表)

有个问题，我有个数据库（ACCESS），其中有个表，表里面有两个列名（书名、单价），我怎么用vb来读取表中的单价的所有记录（也就是这一列），并求和，显示在vb的text上面。
  各位高手，关乎生命，我在线等！请急回帖！

---

sql语句如下：
select 单价 from 表 '---所有记录
select sum(单价) from 表 '---所有记录求和

添加ADODC控件用以上Sql语句去实现，具体代码网上多的象牛毛。

---

能详细点么？

---

Adodc1.CommandType = adCmdText
  Adodc1.CursorLocation = adUseClient
  Adodc1.Refresh
  Text1.Text = Adodc1.Recordset.Fields(0)
  高手，以上几句什么意思？

---

我上网查了查，请问高手们，我想用普通的方法来显示一列的和怎么办？

  Dim cnn As New ADODB.Connection
  Dim appdisk As String
  Dim db As String
  Dim ss As String
  Dim biaoji As Integer
   
  appdisk = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")  
  db = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & appdisk & "shujuku.mdb"
  cnn.CursorLocation = adUseClient
  cnn.Open db '打开数据库连接
   

   
  cnn.Execute (。。。。)
  cnn.Close

在线等呀，希望高手赐教！

---

'
'
'
dim rst as new adodb.