[VB6] IsDate mais en tenant compte du format c'est possible ?

Bonjour à tous et toutes,

mon cher boss  a eu une super idée, il veut que je récupère un chaine dans un textbox (jusque là ça va hein lol), que je vérifie si cette chaine est bien une date et si cette date est valide. Pour faire ça, je reçois deux paramètres (mais je peux en rajouter au besoin) qui sont la chaine et un format (AAAAMMJJ ou JJ/MM/AAAA ect ...).

Ce qui me gène très fort c'est que IsDate ne prend en compte que ce qui est sous la forme JJ/MM/AAAA ou MM/JJ/AAAA. Si je fais un IsDate(20060323) => False. Ce qui est génant aussi, c'est que le format doit être paramétrable dans le fichier ini (pour le récupérer ça va aussi).

Avez vous une idée de comment construire cette fonction ? J'ai déjà la début :

Public Function VerifDate(StrIn as String, FormatIn as String) as boolean
   If  Then
      VerifDate=True
   Else
      VerifDate=False
   End if
End Sub

Je m'excuse d'avance pour le mal de tête

Merci à tous et toutes.

Ben à moins de faire ta propre fonction filtre, je vois pas trop !

Le mieux : convertir le texte saisit en format lisible par IsDate => si l'utilisateur saisit 20060302 le convertir en 02/03/2006 avant d'appeler isDate pour vérifier qu'il s'agit bien d'une date valide.

Salut,
Au pif sans tester :

Public Function VerifDate(StrIn as String, FormatIn as String) as boolean
VerifDate = IsDate(Format(StrIn,FormatIn))
End Function