無論是 DAO 還是 ADO 都有兩種從 Recordset 對象中查詢記錄的方法： Find 方法和 Seek 方法。在這兩種方法中可以讓你指定條件進行查詢與其相應的記錄 , 一般而言，在相同條件下， Seek 方法提供了比 Find 方法更好的性能，因為 Seek 方法是基於索引的。因為這個原因基本提供者必須支持 Recordset 對象上的索引，可以用 Supports ( adSeek ) 方法確定基本提供者是否支持 Seek ，用 Supports ( adIndex ) 方法確定提供者是否支持索引。（例如， OLE DB Provider for Microsoft Jet 支持 Seek 和 Index 。），請將 Seek 方法和 Index 屬性結合使用。如果 Seek 沒有找到所需的行，將不會產生錯誤，該行將被放在 Recordset 的結尾處。執行此方法前，請先將 Index 屬性設置為所需的索引。此方法只受服務器端游標支持。如果 Recordset 對象的 CursorLocation 屬性值為 adUseClient ，將不支持 Seek 。只有當 CommandTypeEnum 值為 adCmdTableDirect 時打開 Recordset 對象，才可以使用此方法。
用 ADO Find 方法
DAO 包含了四個“ Find ”方法： FindFirst,FindLast,FindNext 和 FindPrevious .
DAO 方法 ADO Find 方法
下面的一個例子示范了如何用 ADO Find 方法查詢記錄：
Sub FindRecord(strDBPath As String, _
strTable As String, _
strCriteria As String, _
strDisplayField As String)
' This procedure finds a record in the specified table by
' using the specified criteria.
' For example, to use this procedure to find records
' in the Customers table in the Northwind database
' that have " USA " in the Country field, you can
' use a line of code like this:
' FindRecord _
' "c:Program FilesMicrosoft OfficeOfficeSamplesNorthwind.mdb", _
' "Customers", "Country=' USA '", "CustomerID"
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
' Open the Connection object.
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Open strDBPath
End With
Set rst = New ADODB.Recordset
With rst
' Open the table by using a scrolling
' Recordset object.
