bueno no soy el amigo dazuaga pero creo que soy de los unicos despiertos de este lado del mundo asi que ahi te va
rs.CommandText = "Select * from Consultas1 Where NIF = "& NIF
con la sql anterior estaria bien si NIF fuera numerico es decir se usa para campos numericos algo asi
SELECT * FROM TABLA WHERE ID=1
rs.CommandText = "Select * from Consultas1 Where NIF = ' " & NIF & " ' "
LA ANTERIOR ES CUANDO USAS CADENAS DE CARACTERES
SELECT * FROM TABLA WHERE ID='1N'
es decir cuando el campo Id es Alfanumerico debes poner la comparación entre '
saludos

:)