Bonjour à tous.
Je cherche à enlever les accents qui pourraient être dans une chaine de caractère lue dans un TextBox sans avoir à faire des Replace pour chacun des caractères accentués.
Exemple :
Si une variable Toto contient "Sébastien" il faut qu'elle devienne "Sebastien".
Je sais faire de la façon suivante :
mais je voudrais quelquechose de plus simple et qui fonctionne pour tous les caractères accentués.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Dim Toto As String Toto = Text1.Text Toto = Replace(Toto, "é", "e") Toto = Replace(Toto, "ô", "o") Toto = Replace(Toto, "è", "e") ...
Merci d'avance à ceux qui pourrons m'aider sur ce sujet
Partager