Bonjour,

J'essaye de faire une boucle pour tester la valeur saisie dans une InputBox:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim st As String = " "
While st.Length <> 10 And Not st.Contains("/")
    st = InputBox("Veuillez entrer la date d'entrée (jj/mm/aaaa)")
End While
Le problème est qu'il ne marche pas


J'ai essayé avec la date "10/12/09" et le code a bien continué

Est-ce que quelqu'un sait pour quoi?
Merci d'avance