vb 引用adodb问题

呃~~Adodb是没有控件的，所以看不到，但已经引用了。你打开视图-->对象浏览器就能看到了。

连接数据库的代码如下：
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:a.mdb"
'data source后面是数据库的路径和文件名
rs.Open "Select * From TableName",db,1,1
'这个方式打开的是只读的，想要写就把最后那个参数改为3。具体的参数说明随后附上。自己看实际需要修改。
'这里写下数据库相关操作的语句，实现你想要的功能
rs.Close
db.Close

RS.OPEN SQL,CONN,A,B 
参数A为设定游标的类型，其取值为： 
adOpenForwardOnly  表示只允许在记录集内的记录间往前移动。这个是缺省值。 
adOpenKeyset  反映由其它用户所做的对记录的改变或者删除动作，但并不反映由其它用户做作的添加新记录的动作。 
adOpenDynamic  反映由其它用户所做的对记录的改变或者删除动作，包括添加的新记录 
adOpenStatic  不反映其它用户对记录所做的修改，添加，删除动作。 
他们的常量值定义分别是： 
adOpenForwardOnly  =  0 
adOpenKeyset  =  1 
adOpenDynamic  =  2 
adOpenStatic  =  3 

参数B为记录集的锁定类型，其取值为： 
adLockReadOnly  数据不能改变，这是缺省值！ 
adLockPessimistic  数据提供者在开始编辑数据的时候锁定记录 
adLockOptimistic    仅当调用update方法时，数据提供者锁定记录 
adLockBatchOptimistic  用于批处理修改 
他们的常量值定义分别是： 
adLockReadOnly  =  1 
adLockPessimistic  =  2 
adLockOptimistic  =  3 
adLockBatchOptimistic  =  4

最后说明一下，
如果数据库有密码，把连接字符串改一下，在最后加上：（仍在双引号里面）
;User ID=admin;Password=;Jet OLEDB:Database Password=******
不要少了分号和冒号，最后的星号是密码。