搭配 Microsoft Visual Basic 和 Visual Basic for Applications 使用 ADO

不論您使用 Visual Basic 還是 Visual Basic for Applications，設定 ADO 專案及撰寫 ADO 程式代碼都類似。本主題說明搭配 Visual Basic 和 Visual Basic for Applications 使用 ADO，並記下任何差異。

參照 ADO 程式庫

您的專案必須引用 ADO 程式庫。

在 Visual Basic 中，從 [項目] 功能表中，選取 [參考 ...]。
從清單中選取 Microsoft ActiveX Data Objects x.x Library。確認至少已選取下列程式庫：
- Visual Basic for Applications
- Visual Basic 執行時期物件和程序
- Visual Basic 物件和程式
- OLE Automation
按下 [確定] 。

例如，您可以使用 Microsoft Access，輕鬆地搭配 Visual Basic for Applications 使用 ADO。

在 [Microsoft Access] 中，從 [資料庫] 視窗中的 [模組] 索引卷標選取或建立模組。
在 [工具] 選單上，選取 [參考...]。
從清單中選取 Microsoft ActiveX Data Objects x.x Library。確認至少已選取下列函式庫：
- Visual Basic for Applications
- Microsoft Access 8.0 物件庫（或更新版本）
- Microsoft DAO 3.5 物件庫（或更新版本）
按下 [確定]。

若要為該變數建立自動化變數和物件的實例，您可以使用兩種方法：Dim 或 CreateObject。

您可以使用 New 關鍵詞搭配 Dim，在一個步驟中宣告及建立 ADO 物件的實例：

Dim conn As New ADODB.Connection

或者，Dim 語句宣告和物件具現化也可以是兩個步驟：

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection

注意

您不需要明確地將 ADODB progid 與 Dim 語句搭配使用，只要您已正確參考專案中的 ADO 資料存取物件程式庫。然而，使用它可確保您不會與其他程式庫發生命名衝突。

注意

例如，如果您在相同的項目中同時包含 ADO 和 DAO 的參考，您應該包含限定符，以指定具現化 recordset 物件時要使用的物件模型，如下列程式代碼所示：

Dim adoRS As ADODB.Recordset
Dim daoRS As DAO.Recordset

使用 CreateObject 方法，宣告和物件具現化必須是兩個離散步驟：

Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object

使用 CreateObject 具現化的物件是晚綁定，這表示它們不是強類型，而且命令列完成會停用。不過，它確實可以讓您略過在專案中參考 ADO 程式庫，並讓您實例化特定版本的物件。例如：

Set conn1 = CreateObject("ADODB.Connection.2.0") As Object

您也可以透過特別建立對 ADO 2.0 版類型庫的參考並創建物件來達成此目的。

使用 CreateObject 方法具現化物件通常比使用 Dim 語句慢。

若要處理 Visual Basic Microsoft 中的 ADO 事件，您必須使用 WithEvents 關鍵詞宣告模組層級變數。變數只能宣告為類模組的一部分，而且必須在模組層級宣告。如需處理 ADO 事件的詳細討論，請參閱處理 ADO 事件。

ADO 檔隨附許多 Visual Basic 範例。如需詳細資訊，請參閱 Microsoft Visual Basic 中的ADO 程式代碼範例。