Hola amigo!!!La verdad, en este momento no tengo mucho tiempo paramirar, pero
si mal no recuerdo debes tener en cuenta que el formato que te devuelve el DTPicker no es el mismo formato de texto de la base de datos, lo mas conveniente es que le hagas un Cast a DTpicker.Value y convertir los datos que te arroja al formato correcto.. tal ves era algo asi como esto:
"select * from Prestamo where Cedula='" + Text1.Text +"' and FechaS =" +CDate(DTPicker1.Value)+ ";"
Como te dije no lo recuerdo muy bien, asi que es probable que tengas que hacerlo algo diferente,
no olvides hacerle un seguimiento continuo a los campos, corriendolo paso a paso, seguro que asi encontraras cual es el problema de formato de fecvha...
suerte.