Théorie

      Interface

    Série 1

     Série 2

       Série 3

       Série 4

. 
LES CHAÎNES DE CARACTÈRES
(Inspiré des fiches de Mme Claudette Bélanger et des tutoriels de Sébastien Curutchet et de Bodman)

.

Le traitement des chaînes de caractères (STRING)  se fait à l’aide de différentes fonctions  LEN, LEFT$, RIGHT$, MID$, INSTR, UCASES, LCASES ...  Ces fonctions sont utiles pour  valider une réponse par la recherche de mots présents  dans une phrase,  pour connaître la longueur d’une chaîne,  pour remplacer un mot dans une chaîne,  pour mélanger les lettres d’un mot pour faire un charivari, etc.

Concaténation de chaînes

Il existe deux méthodes pour concaténer (additionner, réunir) les chaînes de caractères. Vous pouvez utiliser l'opérateur + ou l'opérateur &. Quelle est la différence entre ces deux opérateurs? Si vous utilisez le + et que vous ajoutez des chiffres, il les additionnera au lieu de les ajouter tels quels.

Exemples:

ChaineResultat = "Test " & 1 & 2        'Le résultat est Test 12

ChaineResultat = "Test " + 1 + 2        'Le résultat est Test 3 puisque 1 et 2 sont additionnés

Suppression des espaces

il existe deux fonctions permettant de supprimer les blancs en début et fin de chaîne: LTrim (pour les espaces à gauche) et RTrim (pour les espaces à droite).

Exemples:

MsgBox "-" & LTrim("  Salut!!  ") & "-"   'Affiche -Salut!!  -

MsgBox "-" & RTrim("  Salut!!  ") & "-"  'Affiche -  Salut!!-

MsgBox "-" & Trim("  Salut!!  ") & "-"    'Affiche -Salut!!-

Rechercher une chaîne

La recherche d'une chaîne dans un autre est réalisée par la fonction InStr. Cette fonction permet de vérifier si la chaîne recherchée est bien présente, et si oui, alors elle retourne la position de la première itération de la chaîne recherchée.

La fonction InStr s'utilise de la façon suivante:

InStr([PositionDeDépart],Chaine1,Chaine2,[TypeDeComparaison])

• PositionDeDépart: Entier indiquant à partir de quel caractère la recherche doit être réalisée. Par défaut c'est 1.
• Chaine1: Chaine sur laquelle s'effectue la recherche
• Chaine2: Chaine recherchée
• TypeDeComparaison: Indique le type de comparaison à faire (facultatif).

Exemple:

MsgBox InStr("atotobtoto","toto") 'Vous verrez s'afficher 2, ce qui correspond à la position à laquelle toto apparaît pour la première fois.

Remplacer une chaîne

La fonction permettant de réaliser ce travail est la fonction Replace. Elle s'utilise de la façon suivante

N_Chaine = Replace(actuelleChaine,ChaineAChanger,ChaineASubstituer)

Exemple:

NouvelleChaine = Replace(Actuelle,",",".")  'Cette opération remplacera toutes les virgules par des points.

Left$, Right$ et Mid$

Ces instructions servent à prendre une partie précise d'une chaîne, à gauche pour Left, à droite pour Right et au centre pour Mid.

Exemple:

a$ = "Bonjour toi"
debut$ = LEFT$(a$, 7)     'Prendre les 7 premiers caractères à gauche
PRINT debut$                     'Le résultat est Bonjour
fin$ = RIGHT$(a$, 3)        'Prendre les 3 derniers caractères à droite
PRINT fin$                           'Le résultat est toi
milieu$ = MID$(a$, 4, 4) 'Prendre les 4 caractères commençant à la position 4
PRINT milieu$                  'Le résultat est jour

Len

Cette commande sert à connaître le nombre de caractères présents dans une variable de type texte.

Exemple:

Mot$ = "Saperlipopette"
taille% = LEN (Mot$)       'Calcule la longueur de la chaîne
PRINT "Ce mot compte " +taille%+ "caractères"   'Affiche Ce mot compte 14 caractères

Ucase$ et Lcase$

Ces instructions sont utilisées pour changer les minuscules et les majuscules de type String.

Exemples:

text$="Bonjour toi"
UCASE$(text$)   'Ici text$ devient BONJOUR TOI
LCASE$(text$)   'Ici il devient bonjour toi