Verifier qu'un text box ne contient QUE des lettres [a..z][A..Z]

Question

:clown)  aTomicK  :clown) 

   Salut, 

je cherche a verifier qu'un text box ne contient par exemple que des lettres  de a ...z et de A...Z .
Je pourrais mettre ces 52 lettres dans un tableau et rechercher chaque caracteres...mais qqun aurait il une solution toute prete ??
Merci

econs · Answer

' IMPORTANT
'   Référence : Microsoft VB Scripts Regular Expressions 5.5    

Function isValidTextBox(chaineATraiter As String) As Boolean
'Check is the version has the correct format
Dim FORMAT_TEXTBOX As RegExp
Dim MATCHES, MATCH As Object
Dim bReturn As Boolean
    bReturn = True
    Set FORMAT_TEXTBOX = New RegExp
    FORMAT_TEXTBOX.Pattern = "[^a-zA-Z]"
    Set MATCHES = FORMAT_TEXTBOX.Execute(chaineATraiter)
    For Each MATCH In MATCHES
        If Len(MATCH.Value) > 0 Then
            bReturn = False
        End If
    Next

isValidTextBox = bReturn
End Function

Private Sub Command1_Click()
 MsgBox isValidTextBox(Text1.Text)
End Sub

Manu

econs · Answer

Explications :

L'expression régulière [^a-zA-Z] recherche tous les caractères qui ne sont pas des lettres dans ta chaine en entrée.

Si un tel caractère est trouvé, alors la réponse de la fonction est "Faux"

:-)

Manu

atoguum4ever · Answer

:clown)  aTomicK  :clown) 

  Merci pour ta fonction...ca marche nikel !! ;-)

Verifier qu'un text box ne contient QUE des lettres [a..z][A..Z]

3 réponses

Discussions similaires