ok je te remercie mais j'ai trouvé hier soir, quelqu'un à réussi à m'aider sur caramail.... c'est en gros la même méthode !
sauf qu'il y a un problème (avec ton code et le miens) !
si je mets le code dans un bouton, il fait les transformation suivante :
- "aaf" => "af"
- "aaaf" => "a"
moué, et il est passé où mon "f" ?? lol
mais bon, j'ai foutu le code dans un timer et j'ai plus ce pb !
Sinon ouais je sais que c pas super pour certains mots où il bouffe une lettre mais comme mon prog reçoit les touche clavier, si je mets pas un code comme celui que tu m'as donné je vais avoir des caractères répétés 100 fois de suite !!
Enfin merci quand même pour ton aide
@++
Kervergeek :)
-------------------------------
Réponse au message :
-------------------------------
Je viens de penser à ça, c'est pas très pratique quand le texte comprends des mots comme courrir, battre, appeller et autres qui on déjà deux lettres consécutives mais bon...
-------------------------------
Réponse au message :
-------------------------------
Si le texte est dans une TextBox ça se fait comme suit:
Dim intTemp As Integer
For intTemp = 0 To Len(txtText.Text)
txtText.SelStart = intTemp
txtText.SelLength = 2
strTemp = txtText.SelText
If UCase(Mid(strTemp, 1, 1)) = UCase(Mid(strTemp, 2, 1)) Then
txtText.SelText = Mid(strTemp, 1, 1)
End If
Next intTemp
C'est pas sorcier, tu devrais comprendre!
Espérons que ça va t'aider!
SirGus qui est dans une rage d'aide
-------------------------------
Réponse au message :
-------------------------------
Je voudrais faire une fonction pour qu'il reconnaisse 2 mêmes caractères ("aa") qui se suivent et les remplace par une fois ce caractère ("a")...
Par exemple, "bonjouur" ----> "bonjour".
Et ce, valable pour tous les caractères....
Alors je sais faire la sélection et le remplacement de texte mais je sais pas comment faire la fonction...
merci
Kevergeek