Visual Basic - Recordset

Quisiera saber como se hace para recorrer todos los datos de un recorset. me explico. si tengo una consulta que busque los nombres con un filtro en apellidos fernandez. cuando hago:

Esto es con SQL...si no sabes avisame y te mando la otra forma, pero explicame bien el tema del filtro. Aca va...

'List1=lstResult, Text1=txtBusqueda

Dim Completo$
lstResult.Clear
Dim BDD As Database, TBL As Recordset
Set BDD = OpenDatabase(App.Path & "\base de datos.mdb")
Completo = "SELECT * FROM nombre_tabla WHERE " & campo_de_busqueda & " LIKE '*" & txtBusqueda & "*';"
Set TBL = BDD.OpenRecordset(Completo)
Completo = ""
If Not TBL.EOF Then
Do While Not TBL.EOF
lstResult.AddItem TBL!Nombre & " " & TBL!Apellido
TBL.MoveNext
Loop
Else
lstResult.AddItem "No se encontraron coincidencias"
End If

Espero que te sirva...SALU2.