Validar Fecha en VB6

[alan_69niupi]

me imagino que estas usando un datatimepiecker, ya que seria mucho mas facil de hacer loq ue pides. esto generan el formato o tienes la opcion de elegir el formato.
declara una variable para toda la clase
Dim fecha_inicio As String

Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
fecha_inicio = DateTimePicker1.Value
End Sub

en la variable fecha_inicio tienes almacenado el valor en dd/mm/aaaa
de esta manera no tendrias que validar que los datos sean correctos. es decir el datatime lo hace por ti. tal ves lo unico que podria pasar se que limtes los dias, meses y años que mostrara el data grid. pero eso el las propiedades lo muestra. espero haberte ayudado