Fonctions de chaîne (Visual Basic)

Le tableau suivant répertorie les fonctions que Visual Basic fournit dans la classe Microsoft.VisualBasic.Strings pour rechercher et manipuler des chaînes. Elles peuvent être considérées comme des fonctions intrinsèques Visual Basic. Autrement dit, vous n’avez pas besoin de les appeler en tant que membres explicites d’une classe, comme le montrent les exemples. Des méthodes supplémentaires, et dans certains cas des méthodes complémentaires, sont disponibles dans la classe System.String.

Méthode .NET Framework Description
Asc, AscW Retourne une valeur Integer représentant le code de caractère correspondant à un caractère.
Chr, ChrW Retourne le caractère associé au code de caractère spécifié.
Filter Retourne un tableau de base zéro et contenant un sous-ensemble d'un tableau de chaînes (String) basé sur des critères de filtre spécifiés.
Format Retourne une chaîne mise en forme conformément aux instructions contenues dans une expression String de format.
FormatCurrency Retourne une expression sous forme de valeur monétaire utilisant le symbole monétaire défini dans le Panneau de configuration du système.
FormatDateTime Retourne une expression de chaîne représentant une valeur de date/d'heure.
FormatNumber Retourne une expression sous forme de nombre.
FormatPercent Retourne une expression au format pourcentage (c’est-à-dire multipliée par 100) avec le caractère de fin %.
InStr Retourne un entier spécifiant la position de début de la première occurrence d'une chaîne à l'intérieur d'une autre.
InStrRev Retourne la position de la première occurrence d'une chaîne dans une autre, à partir du côté droit de la chaîne.
Join Retourne une chaîne créée par la jonction de plusieurs sous-chaînes contenues dans un tableau.
LCase Retourne une chaîne ou un caractère converti en lettres minuscules.
Left Retourne une chaîne contenant un nombre spécifié de caractères en partant de la gauche d'une chaîne.
Len Retourne un entier qui contient le nombre de caractères d’une chaîne.
LSet Retourne une chaîne alignée à gauche contenant la chaîne spécifiée ajustée à la longueur spécifiée.
LTrim Retourne une chaîne contenant une copie d’une chaîne spécifiée sans espaces de début.
Mid Retourne une chaîne contenant un nombre spécifié de caractères d’une chaîne.
Replace Retourne une chaîne dans laquelle une sous-chaîne spécifiée a été remplacée par une autre sous-chaîne, un nombre de fois déterminé.
Right Retourne une chaîne contenant un nombre spécifié de caractères depuis la partie droite d'une chaîne.
RSet Retourne une chaîne alignée à droite contenant la chaîne spécifiée ajustée à la longueur spécifiée.
RTrim Retourne une chaîne contenant une copie d’une chaîne spécifiée sans espaces de fin.
Space Retourne une chaîne composée d'un nombre spécifié d'espaces.
Split Retourne un tableau à une dimension de base zéro et contenant le nombre spécifié de sous-chaînes.
StrComp Retourne -1, 0 ou 1, à partir du résultat d'une comparaison de chaînes.
StrConv Retourne une chaîne convertie comme spécifié.
StrDup Retourne une chaîne ou un objet constitué du caractère spécifié répété le nombre de fois spécifié.
StrReverse Retourne une chaîne dans laquelle l'ordre des caractères d'une chaîne donnée a été inversé.
Trim Retourne une chaîne contenant une copie d’une chaîne spécifiée sans espaces de début ou de fin.
UCase Retourne une chaîne ou un caractère contenant la chaîne spécifiée convertie en majuscules.

Vous pouvez utiliser l’instruction Option Compare pour définir si les chaînes sont comparées à l’aide d’un ordre de tri de texte qui ne respecte pas la casse, déterminé par les paramètres régionaux de votre système (Text) ou par les représentations binaires internes des caractères (Binary). La méthode de comparaison de texte par défaut est Binary.

Exemple : UCase

L'exemple suivant utilise la fonction UCase pour retourner une version en majuscules d'une chaîne.

' String to convert.
Dim lowerCase As String = "Hello World 1234"
' Returns "HELLO WORLD 1234".
Dim upperCase As String = UCase(lowerCase)

Exemple : LTrim

Cet exemple utilise la fonction LTrim pour supprimer les espaces à gauche et la fonction RTrim pour supprimer les espaces à droite d'une variable chaîne. Il utilise la fonction Trim pour supprimer les deux types d'espaces.

' Initializes string.
Dim testString As String = "  <-Trim->  "
Dim trimString As String
' Returns "<-Trim->  ".
trimString = LTrim(testString)
' Returns "  <-Trim->".
trimString = RTrim(testString)
' Returns "<-Trim->".
trimString = LTrim(RTrim(testString))
' Using the Trim function alone achieves the same result.
' Returns "<-Trim->".
trimString = Trim(testString)

Exemple : Mid

Cet exemple utilise la fonction Mid pour retourner un nombre spécifié de caractères d’une chaîne.

' Creates text string.
Dim testString As String = "Mid Function Demo"
' Returns "Mid".
Dim firstWord As String = Mid(testString, 1, 3)
' Returns "Demo".
Dim lastWord As String = Mid(testString, 14, 4)
' Returns "Function Demo".
Dim midWords As String = Mid(testString, 5)

Exemple : Len

L'exemple suivant utilise la fonction Len pour retourner le nombre de caractères d'une chaîne.

' Initializes variable.
Dim testString As String = "Hello World"
' Returns 11.
Dim testLen As Integer = Len(testString)

Exemple : InStr

L'exemple suivant utilise la fonction InStr pour retourner la position de la première occurrence d'une chaîne à l'intérieur d'une autre.

' String to search in.
Dim searchString As String = "XXpXXpXXPXXP"
' Search for "P".
Dim searchChar As String = "P"

Dim testPos As Integer
' A textual comparison starting at position 4. Returns 6.
testPos = InStr(4, searchString, searchChar, CompareMethod.Text)

' A binary comparison starting at position 1. Returns 9.
testPos = InStr(1, SearchString, SearchChar, CompareMethod.Binary)

' If Option Compare is not set, or set to Binary, return 9.
' If Option Compare is set to Text, returns 3.
testPos = InStr(searchString, searchChar)

' Returns 0.
testPos = InStr(1, searchString, "W")

Exemple : Format

L'exemple suivant illustre différentes utilisations de la fonction Format pour mettre en forme des valeurs utilisant à la fois les formats String et les formats définis par l'utilisateur. Pour le séparateur de date (/), le séparateur d'heure (:) et les indicateurs AM/PM (t et tt), le résultat réel mis en forme affiché par votre système dépend des paramètres régionaux utilisés par le code. Lorsque les heures et les dates sont affichées dans l'environnement de développement, les formats d'heure abrégée et de date courte des paramètres régionaux de code sont utilisés.

Notes

Pour paramètres régionaux configurés avec une horloge au format 24 heures, les indicateurs AM/PM (t et tt) n'affichent rien.

Dim testDateTime As Date = #1/27/2001 5:04:23 PM#
Dim testStr As String
' Returns current system time in the system-defined long time format.
testStr = Format(Now(), "Long Time")
' Returns current system date in the system-defined long date format.
testStr = Format(Now(), "Long Date")
' Also returns current system date in the system-defined long date 
' format, using the single letter code for the format.
testStr = Format(Now(), "D")

' Returns the value of testDateTime in user-defined date/time formats.
' Returns "5:4:23".
testStr = Format(testDateTime, "h:m:s")
' Returns "05:04:23 PM".
testStr = Format(testDateTime, "hh:mm:ss tt")
' Returns "Saturday, Jan 27 2001".
testStr = Format(testDateTime, "dddd, MMM d yyyy")
' Returns "17:04:23".
testStr = Format(testDateTime, "HH:mm:ss")
' Returns "23".
testStr = Format(23)

' User-defined numeric formats.
' Returns "5,459.40".
testStr = Format(5459.4, "##,##0.00")
' Returns "334.90".
testStr = Format(334.9, "###0.00")
' Returns "500.00%".
testStr = Format(5, "0.00%")

Voir aussi