Visual Basic - Consulta con SQL

Hola.

Tengo una tabla con los campos apellidos y nombre y quiero seleccionar los registros que contengan el nombre y apellidos.
El problema es que al ser la selección en un mismo registro, me da error.

rsBusca.Open "SELECT Apellidos, Nombre FROM Cliente Where " _
& "Apellidos = '" & TxtPrestai(0) & "' and (Select Nombre from Cliente where nombre = '" & TxtPresta(1) & " ' )", cn

podria ser:
rsBusca.Open consulta, cn, adOpenStatic, adLockOptimistic, adCmdText
en tu caso:
consulta="SELECT Apellidos, Nombre FROM Cliente Where " _
& "Apellidos = '" & TxtPrestai(0) & "' and (Select Nombre from "_
& "Cliente where nombre = '" & TxtPresta(1) & " ' )",