Visual Basic - Porque no funciona esto?

Porqué no funciona esto?
DataIngreso.Database.Execute "UPDATE Ingresos SET Ingresos.Fecha = " & DTPicker1 & ", Ingresos.Monto = '" & txtMonto1 & "', Ingresos.Concepto = '" & DBConcepto1 & "', Ingresos.Observaciones = '" & txtObservaciones1 & "' WHERE (((Ingresos.Saldo)= '" & txtSaldito & "'));"
Gracias por tu ayuda

Carlos
Asunción-Paraguay

Si estás utilizando Access las fechas van entre numerales # y los valores numéricos sin prefijos ni sufijos (si en éste caso Monto y Saldo son numéricos):

DataIngreso.Database.Execute "UPDATE Ingresos SET Ingresos.Fecha = #" & DTPicker1 & "#, Ingresos.Monto = " & txtMonto1 & ", Ingresos.Concepto = '" & DBConcepto1 & "', Ingresos.Observaciones = '" & txtObservaciones1 & "' WHERE Ingresos.Saldo= " & txtSaldito