讀取資料庫中某筆資料到變數

Question

請問VB 有辦法讀取資料庫(access)中的，某行某列資料到自已所宣告的變數裡嗎?
前提是不透過控制項直接存到變數。
如果可以，可以寫個程式碼或語法嗎，拜託囉~!!!

謝謝你囉，雖然我只要 var1 = Rs(0)
但還是感謝你熱心回答!!!

Answer 1

假設資料庫檔名是「db1.mdb」，資料表名稱是「資料表1」。

功能表設定：
專案->設定引用項目->（勾選）Microsoft ActiveX Data Objects 2.0 Library

Private Sub Command1_Click()

Dim Cnn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim var1 As Variant

Cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\yoo\桌面\db1.mdb;Persist Security Info=False"
Cnn.Open
Rs.Open "select * from 資料表1", Cnn

var1 = Rs(0)
MsgBox var1

End Sub