Primero en el vb, menu proyecto, referencias, luego activas esta referencia:
Microsoft ActiveX Data Object 2.5
En tu form, declaras
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Private Sub cmdConectar_Click()
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =C:\basededatos.mdb "
cn.Open
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "Select * from doc", cn, adOpenDynamic, adLockOptimistic
Set Me.DataGrid1.DataSource = rs
End Sub
Hasta alli habras conectado, y veras los datos en tu datagrid.
Ahora solo faltaria la busqueda que es bastante sencillo, y nada mas.
Esto usando una BD en access