ADO中常用对象有7个，其中Connection、command、recordset三个为独立对象，剩余四个必须依赖于三个独立对象才能使用。
ADO的核心是Connection、command、recordset，
首先用connection与数据库建立连接，然后用command对象执行命令，如查询，更新，删除，增加等等，用recordset对象来操作和查看查询结果，介绍到此为止，接下来通过实例来具体理解吧。
1、连接数据库：

Dim objCn as New ADODB.Connection					'创建连接
Dim objRs as New Recordset									'定义一个数据库的记录集
objCn.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;" & _
								"Data Source = " & App.Path & "\实例01.mdb"			'建立连接
objCn.Open										'打开连接

2、操作
a、调用SQL语句：

strSQL = "SELECT 口令 FROM 系统用户 WHERE 用户名= ' " & UserName & " '"
Set objRs.ActiveConnection = objCn					'设置连接对象
objRs.Open (strSQL)									'打开记录集（SQL命令）

当然还可以用SQL语句进行其他操作，增、删、改、查。
b、command命令对象进行操作

Dim objRs As New Recordset  '定义局部记录集对象
	objCmd("用户名") = "%" & txtUser & “%”		'获得查询参数 
    Set objCn = New Connection             '实例化Connection对象objCN
            '创建执行参数查询的Command对象objCmd
    Set objCmd = New Command
    Set objCmd.ActiveConnection = objCn
            With objCmd
                .CommandText = "SELECT * FROM 系统用户 WHERE 用户名 LIKE?"
                .CommandType = adCmdText
            End With
        '为Command对象objCmd创建参数
Dim Parm As New Parameter
	Set Parm = objCmd.CreateParameter("用户名", adVarChar, adParamInput, 10)
	objCmd.Parameters.Append Parm

以上就是连接数据库的方法及对象的使用方法，千万不要忘了连接完数据库后一定要关闭连接并清除数据。

'释放Command和Connection对象
Set objCmd = Nothing
objCn.Close			'关闭连接
Set objRs = Nothing

还有剩余的四个对象：
Fields 字段对象：依赖于记录集Recordset对象使用.
Properties 属性对象：与connection、command、recordset、field都有关联.
Parameters 参数对象：依赖于Command(命令对象)使用，用于参数查询提供数据.
Error 错误对象：用于避免应用程序在程序执行过程中意外终止，引用ADO数据库.