Access 2013 でADOがうまく使えません

Access 2013 でADOが使えません。

下記のように記載しています。

Dim DB as ADODB.Connection
Dim rs as ADODB.Recordset

Set DB = CurrentProject.Connection

Set rs = New ADODB.Recordset
rs.Open "xxxxxxx", DB, adOpenKeyset, adLockOptimistic

「参照設定」で
Microsoft ActiveX Data Objects Recordset 6.0 Library
にはチェックを入れています。

実行すると
最初の Dim DB as ADODB.Connection の部分で

コンパイルエラー
ユーザー定義型は定義されていません

と出てストップしてしまいます。
何が間違いなのでしょうか。

No.1 ベストアンサー 回答者： bonaron 回答日時： 2015/08/01 17:54

> 「参照設定」で

> Microsoft ActiveX Data Objects Recordset 6.0 Library
> にはチェックを入れています。

2013 は使ったことがないので確かなことは言えませんが、
普通は
[Microsoft ActiveX Data Objects x.x Library]
を参照設定するのではないでしょうか？

この回答へのお礼

ありがとうございました。言われる通り Microsoft ActiveX Data Objects 2.8 Library にチェックを入れたら、完璧に動きました。助かりました。

お礼日時：2015/08/01 22:23