Visual Basic - busqueda de datos en datagrid

Kiero realizar una buskeda de un dato(un textbox) en un datagrid, y si no existe ese dato en el datagrid q m muestre un msj como lo hago?
para q m carguen los datos q existen hago lo siguiente, pero no se como poner el codigo para cuando no exista un dato:

Dim larsrecordset As ADODB.Recordset

' crear recordset
Set larsrecordset = New ADODB.Recordset

' establecer datos de conexión
larsrecordset.ActiveConnection = conexion

' cursor del lado cliente
larsrecordset.CursorLocation = adUseClient

' abrir recordset

Dim i As Long
' clng convierte a long el txtnumpedido.Text
i = CLng(gfrmpedidoprincipal.txtbusnumpedido.Text)
larsrecordset.Open "SELECT * FROM pedido_cab where pedido_cab.num_pedido=" & i, , adOpenStatic, adLockOptimistic, adCmdText

Set Me.DataGrid1.DataSource = larsrecordset

Set adcpedido_cab.Recordset = larsrecordset

Call DataGrid1_RowColChange(1, 1)

Buscalo mas o menos asi.. en este momento estoy con poco tiempo, pero si no podes hacerlo, mandame un mail y te mando algun ejemplo, no es para nada dificil...
Salu2

Matias...

Set DataGrid1.DataSource = rs

If txt.Text <> "" Then
rs.Filter = "campo like '" & txt.Text & "%'"
Else
rs.Filter = ""
End If
Set DataGrid1.DataSource = rs

Matias: yo no entendi muy bien, tengo esa misma duda de busqueda dentro de un datagrid... espero y te puedas explicar un poco mas o mandarme un ejemplo a mi mail [email protected]
muchas gracias de antemano
espero tu respuesta