Traitement des chaînes de caractères

Left et Right : Prendre les extrêmes d'une chaîne de caractères

Sub GaucheDroite()
  MsgBox Left("abcdef", 3)
  MsgBox Right("abcdef", 2)
End Sub

MID extrait des caractères au milieu d'une chaîne

Sub MilieuChaine()
  MsgBox Mid("abcde", 3, 2) ' renvoie cd
  MsgBox Mid("abcde", 3, 10) ' renvoie cde
  MsgBox Mid("abcde", 10, 3) ' renvoie une chaîne nulle
End Sub

InStr: Vérifie l 'occurence d'une chaîne dans une autre.

Sub FonctionInStr()
  ' Exemple 1 : X contiendra 2
  MsgBox InStr("abc", "b")
  ' Exemple 2 : X contiendra 0
  MsgBox InStr("abc", "B")
  ' Exemple 3 : X contiendra 2
  MsgBox InStr("abc", "bc")
  ' Si dans la section General/Declarations, on écrit Option Compare Text, on peut comparer avec succès les minuscules et les majuscules. Si par contre on écrit Option
  ' Compare Binary (option par défaut), les caractères ASCII sont purement comparés.
  ' Mais, on peut avoir Option Compare Binary, et malgré tout, exceptionnellement demander une comparaison de texte avec :
  MsgBox InStr(0, "abc", "B", 1)
End Sub

CHR : Renvoie la valeur ASCII d'un caractère

Sub FonctionChr()
  MsgBox Chr("a") ' renvoie 97 (code ASCII de a)
End Sub

LEN : Calcule la longueur d'une chaîne

Sub LongueurChaine()
  MsgBox Len("abc") ' renvoie 3 (lettres)
End Sub

UCase et LCase Transforment les minuscules en majuscules et vice versa

Sub MajusculeMinuscule()
  MsgBox UCase("textE") ' renvoie TEXTE
  MsgBox UCase("téxte") ' renvoie TÉXTE
  MsgBox LCase("TExte") ' renvoie texte
End Sub

VAL renvoie l'équivalent numérique d'une chaîne

Sub FonctionVal()
  MsgBox Val(" 21x") ' renvoie 21
  MsgBox Val("x21") ' renvoie 0
  MsgBox Val(21) ' donne une erreur (le paramètre doitêtre une chaîne de caractères)
End Sub