Visual Basic - Consulta Sql con dos condicionales

Buenas, necesito un favor, tengo el siguiente código:

rs.Open "select * from registros where fechaentrada = '" & Date & "'", db, adOpenDynamic, adLockOptimistic

deseo usar esa misma estructura, pero con dos condiciones, osea que me coincida la fecha y la cedula.

algo así

rs.Open "select * from registros where fechaentrada = '" & Date & "'" And "AND cedula=" & Val(Text1.Text), db, adOpenDynamic, adLockOptimistic

Gracias

Rst2.Open "select * from tabla where campo='" & text1.text & "' and fecha = '" & Format(FECHA.Value, "dd/mm/yyyy") & "'and campo2 = '" & text2.text & "'", cnn, adOpenDynamic, adLockOptimistic

Muchas gracias, excelente.