Section courante

A propos

Section administrative du site

TRIM$

Enlève les espaces aux extrémités
Visual Basic

Syntaxe

Function TRIM$(chaine As String) As String

Paramètres

Nom Description
chaine Ce paramètre permet d'indiquer la chaîne de caractères contenant l'expression à traiter

Description

Cette fonction supprime les caractères d'espace au début et à la fin d'une chaîne de caractères.

Algorithme

MODULE TRIM$(string)
   BOUCLE POUR I ← 0 JUSQU'A longueur(string)
      SI string[I] <> ' ' ALORS
         ARRETER BOUCLE
      FIN SI
   FIN BOUCLE POUR
   SI I = longueur(string) ALORS
      RETOURNER '';
   FIN SI
   BOUCLE POUR J ← longueur(string) - 1 JUSQU'A 0 SAUT -1
      SI string[J] <> ' ' ALORS
         ARRETER BOUCLE
      FIN SI
   FIN BOUCLE POUR
   RETOURNE sous-chaine(string, de la position I,de longueur J - I + 1)

Exemple

Cet exemple permet d'enlever les espaces entre les noms :

  1. Sub Main()
  2.  MsgBox trim$(" Sylvain ") & trim$(" Maltais ")
  3. End Sub

on obtiendra le résultat suivant :

SylvainMaltais

Dernière mise à jour : Lundi, le 19 novembre 2012