Se voce estiver usando um objeto DATA use
db_pesquisa.SQL = " select cadastro.nome,cadastro.codigo,cadastro.endereço,cadastro.cidade from cadastro where cadastro.sobrenome like 'Silva' "
Se voce estiver abrindo as tabelas use
Dim conec As Connection, tbl_aux As Recordset
....... faz a coneccao com o banco e etc........
Set tbl_aux = conec.OpenRecordset("select cadastro.nome,cadastro.codigo,cadastro.endereço,cadastro.cidade from cadastro where cadastro.sobrenome like 'Silva' ", dbOpenSnapshot)
Isso em VB.