Hola, Marco Antonio:
Si por "control de fecha" entendemos un control DateTimePicker, va a ser un poco complicado seleccionar una fecha no válida, o asignarle una fecha incorrecta. No obstante, verifica la fecha en el evento Validanting de dicho control. Inserta en
el formulario un control ErrorProvider, y ejecuta algo parecido a lo siguiente:
Private Sub DateTimePicker1_Validating( _
ByVal sender As Object, _
ByVal e As System.ComponentModel.CancelEventArgs) _
Handles DateTimePicker1.Validating
Dim dt As DateTimePicker = DirectCast(sender, DateTimePicker)
Try
Dim fecha As DateTime = dt.Value
Catch ex As Exception
ErrorProvider1.SetError(dt, "La fecha no es válida.")
End Try
End Sub
Un saludo
Enrique Martínez [MS MVP - VB]