begin process at 2012 02 10 02:24:55
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Texte

 > REPLACE

REPLACE


 Information sur la source

Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Texte Niveau :Débutant Date de création :08/08/2002 Date de mise à jour :04/09/2002 22:41:09 Vu / téléchargé :4 218 / 213

Auteur : DeAtHCrAsH

Ecrire un message privé
Site perso
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
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

  • 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
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

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture OUVRIR UNE APPLICATION ET LA FEMER
Source avec Zip Source avec une capture PROGRESSBAR ( CHANGER LA COULEUR)
Source avec Zip Source avec une capture FICHIER ( DECOUPEUR )
Source avec Zip Source avec une capture DEFFILLEMENT DE TEXTE COMME DANS LES CREDITS DE JEUX
Source avec Zip Source avec une capture INSERER UNE IMAGE DANS UNE RICHTEXTBOX

 Sources de la même categorie

Source avec Zip Source avec une capture MASQUE DE SAISIE NUMÉRIQUE par acive
Source avec Zip Source .NET (Dotnet) COMPTEUR DE NOMBRE DE MOTS DANS UN TEXTE par alpha5
Source avec Zip Source avec une capture HM - BLOCNOTE par hassenmajor
Source .NET (Dotnet) [VB.NET] CLASS DE COLORATION SYNTAXIQUE "ON THE FLY" par huzima
Source avec Zip Source avec une capture PERSONNALISEZ VOS BOÎTES DE MESSAGE (X)HTML par medjahedScript

Commentaires et avis

Commentaire de Cyberdevil le 08/08/2002 21:30:24

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

Commentaire de Mercury le 09/08/2002 10:52:41

Cyberdevil =&gt; 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 ;-)

Commentaire de tahbre le 09/08/2002 13:11:09

yep, très très utile pour moi et pour les utilisateurs de vb5 et versions précédentes,
tks DeAtHCrAsH

Commentaire de DeAtHCrAsH le 09/08/2002 13:23:52

Mercury =&gt; Exact... J'ai aussi fait la meme chose pour la fonction SPLIT... La source est aussi sur VbFrance pour ceux que ca interresse....

Commentaire de PROGRAMMIX le 07/11/2002 09:57:12

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

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,608 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales