Hola Phillip , gracias por tu respuesta.
segun lo que he entendido, esto es alo que te refieres ?
Private Sub dtpFentrada_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtpFentrada.ValueChanged
Try
Dim k As String
k = dtpFentrada.Value
If k = cboNombre.SelectedIndex > -1 Then
fila = cboNombre.SelectedIndex
dtpFentrada.Value = cboNombre.SelectedValue
End If
Catch ex As Exception
End Try
End Sub
pero no cambia la Fecha

, me gustaria que me pongas un ejemplo por favor.
gracias otra vez