umm hi I know ho you can do this but at the moment I not got time to make an example for you how ever I took a pice of code I used in a program I made years ago that may help get you started,
VB Code:
Dim StrSql As String
On Error Resume Next
RecoredSet = "TestTable"
StrSql = "SELECT Firstname,LastName,Age " & _
"FROM " & RecoredSet & " WHERE Firstname Like '*" & "Kevin" & "*'"
Set Recored_Set = d_base.OpenRecordset(StrSql)
If Recored_Set.RecordCount = 0 Then SiteFound = False: Exit Function
With Recored_Set
While Not Recored_Set.EOF
'This just loops tho and picks out any names
MsgBox !Firstname
MsgBox !LastName
.MoveNext
Wend
End With
Set Recored_Set = Nothing
StrSql = ""