本文實例講述了使用ADODB.Connection連接access資料庫的方法，驅動類型版本為：Microsoft.Jet.OLEDB.4.0。在VB的資料庫操作中，連接資料庫是第一步，也是最基本的，本文所述的這個例子，對於初學者學習如何在VB中連接Access資料庫有著很好的借鏡參考價值。
具體實作程式碼如下：
VERSION 5.00Begin VB.Form 操作資料庫Caption = "VB操作資料庫" ClientHeight = 3645 ClientLeft = 4905 ClientTop = 4260 ClientWidth = 5895 LinkTopic = "Form1" ScalefHeight = 3645 Scight VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = FalseOption ExplicitPrivate Sub Form_Load()Dim 資料庫As ObjectSet 資料庫， Source=Data.mdb;") '連接資料庫If ((資料庫.State) = (adStateOpen)) Then MsgBox ("連線成功！")Else MsgBox ("連線失敗！")End If資料庫.CloseSet 資料庫= NothingEnd Sub這個實例建立了一個名為「資料庫」的New ADODB.Connection對象，用此對象增連接資料庫，在連接成功後，彈出訊息框告之連接結果，在大多數情況下，VB與Access2003之前版本的資料庫連接，基本上都這樣。測試資料庫請放在VB同級目錄下，Data.mdb可依自己實際的資料庫路徑進行修改。