Cita:
Iniciado por asastrem 
gracias
ya intente tu sugerencia
Dim miParametro As New SqlParameter
Dim MiFecha
DTP1.Value.ToString("MM/dd/yyyy")
MiFecha = DTP1
miParametro.ParameterName = "@Fecha"
miParametro.SqlDbType = SqlDbType.DateTime
miParametro.Value = (MiFecha)
miComando.Parameters.Add(miParametro)
pero sigue mandando el error
Error al convertir el valor del parámetro de DateTimePicker a DateTime.
¿En qué línea manda el error?
De todas formas, inténtalo eliminando las líneas que te marco en rojo y pon el valor del parámetro así:
miParametro.Value = DTP1.Value.ToString("MM/dd/yyyy") 