Pb creation fonction remplacement de texteRésolu

Question

Bonjour tout le monde,

je souhaite créer une fonction qui remplace certains caractère d'une chaine, voici ma fonction : 

    Public Function modif_titre(ByVal chaine)
        chaine = Microsoft.VisualBasic.Replace(chaine, " ", "")
        chaine = Microsoft.VisualBasic.Replace(chaine, ",", "")
        chaine = Microsoft.VisualBasic.Replace(chaine, ".", "")
        chaine = Microsoft.VisualBasic.Replace(chaine, "!", "")
        chaine = Microsoft.VisualBasic.Left(chaine, 8)
    End Function

et mon appel 

titre=modif_titre(vartitre)
et ca retourne ... rien du tout.

Par contre si je prends mes 'éléments' de ma fonction, c'est a dire "chaine= etc..." et que je le mets dans mon code directement ca marche.

Pouvez vous m'aider, merci.

jrivet · Accepted Answer

Salut,
Public Function modif_titre(ByVal chaine)
   chaine = Microsoft.VisualBasic.Replace(chaine, " ", "")
   chaine = Microsoft.VisualBasic.Replace(chaine, ",", "")
   chaine = Microsoft.VisualBasic.Replace(chaine, ".", "")
   chaine = Microsoft.VisualBasic.Replace(chaine, "!", "")
   chaine = Microsoft.VisualBasic.Left(chaine, 8)
   Return chaine
End Function<hr />, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

pile_poil · Answer

Public Function modif_titre( chaine  as String )as String

jrivet · Answer

Re,
Oui effectivement c'est mieux de Typer les variables.

@+: Ju£i?n
Pensez: Réponse acceptée

kciope · Answer

Merci beaucoup , grace a vous ca marche impecc!!!

Pb creation fonction remplacement de texte

4 réponses

Votre réponse

Discussions similaires