Replace

Soyez le premier à donner votre avis sur cette source.

Vue 5 236 fois - Téléchargée 277 fois

Description

Voici un petit bout de code très simple reconstituant la fonction REPLACE de VB6.
Cette fonction permet de rechercher une chaine de charactere contenue dans une expression et de la remplacer par une autre...
Le screen parle de lui meme.

J'espere que ce code pourra se rendre utile autant que possible.

Source / Exemple :


Public Function ReplaceBis(Expression As String, Find As String, Replace As String) As String
Dim pos As Integer
    For i = 0 To Len(Expression)
        pos = InStr(1, Expression, Find)
        If pos <> 0 Then
            Expression = Mid(Expression, 1, pos - 1) & Replace & Mid(Expression, pos + Len(Find))
        End If
    Next i
    
ReplaceBis = Expression
End Function

Conclusion :


Merci par avance pour vos commentaires...
A++ et bonne prog a tous...

DeAtH_-_CrAsH

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1133
Date d'inscription
mercredi 2 octobre 2002
Statut
Membre
Dernière intervention
24 juillet 2011
1
La fonction REPLACE existe bien et me paraît très pratique
MAIS elle a un inconvénient : elle prend toutes les chaines qui correspondent sans se poser de question...
J'ai une phrase du genre "L'auteur du livre s'est rendu au toilette"
Si je fait Replace(MaPhrase, "au", "") et Replace(MaPrase, "du", "") pour déblayer un peu, ça donne:
L'teur livre s'est ren toilette... Pour mois c'est un peut trop déblayer
Donc une fonction personnalité me paraît être intéressante puisqu'on peut y mettre des paramètres de vérification (à moins que dans replace aussi ???)...
Parce qu'il y a le zip et la capture, je met 9 et m'en vais voir la fonction split
Messages postés
2671
Date d'inscription
vendredi 25 janvier 2002
Statut
Membre
Dernière intervention
6 février 2013
2
Mercury => Exact... J'ai aussi fait la meme chose pour la fonction SPLIT... La source est aussi sur VbFrance pour ceux que ca interresse....
Messages postés
41
Date d'inscription
mercredi 31 juillet 2002
Statut
Membre
Dernière intervention
15 septembre 2003

yep, très très utile pour moi et pour les utilisateurs de vb5 et versions précédentes,
tks DeAtHCrAsH
Messages postés
329
Date d'inscription
jeudi 3 janvier 2002
Statut
Membre
Dernière intervention
7 octobre 2005

Cyberdevil => Effectivement, ça existe déjà, mais seulement depuis la version de VB6, d'où l'intérêt du code proposé par DeAtHCrAsH pour ceux ayant une version antérieure à VB6 ;-)
Messages postés
483
Date d'inscription
mardi 10 juillet 2001
Statut
Membre
Dernière intervention
12 juillet 2006

C'est bien meme si ça existe déjà !
Mais vive VB6 !
lol
a+
cyberdevil

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.