Vb Gestion de chaines de caractères

Les chaînes de caractères

La déclaration d’une chaine se fait de la manière suivante :

DIM Str As String Str est une chaine vide 

Str= "" 'Str contient "" : chaîne vide

Str= "TOTO" 'Str contient "TOTO"

Dim A As string= "Visual"

Dim B As string= "Basic"

Label.text = "A+B" affiche bêtement la chaîne « A+B »

Label.text = A+B affiche « Visual Basic » ‘on affiche les

Les Méthode de la classe String :

La méthode Length

Elle renvoie la taille de la chaîne en question en commençant par 1 -> si la variable Nom contient la vlauer ANASS Nom.Length donne la résultat 5 

La méthode ToUpper

Mettre en majuscules une chaîne de caractère Str=Str.ToUpper()

Si Str contenait "abc" il contiendra "ABC"

La méthode ToLower

Transforme par contre la chaîne en minuscule : A.ToLower

La méthode Equals

Elle sert pour comparer deux chaîne et qui retourne true or false et qui admet comme paramètre une ou 2 chaine de caractère selon le mode d’utilisation :

S1.Equals(S2) ou String.Equals(S1,S2)

 

Exercice 1

Ecrire un programme qui permet de comparer deux chaînes de caractères que l’utilisateur doit saisir à partir du clavier.

NB ! la chaîne VB est égale à la chaîne vb

Solution

Sub Main()

        Console.WriteLine("taper votre 1ere chaine")

        Dim S1 As String = Console.ReadLine

        Console.WriteLine("taper votre 2eme chaine")

        Dim S2 As String = Console.ReadLine

        Console.WriteLine("1ere chaine  = " & S1)

        Console.WriteLine("2eme chaine = " & S2)

        If String.Equals(S1, S2)

              Then

              Console.WriteLine("les chaines sont egales")

              Else : Console.WriteLine("les chaines sont différentes")

        End If

End Sub

La méthode IndexOf

Elle renvoie la position de départ de la sous-chaîne ou –1 si celle-ci n’a pas été trouvée.

Des paramètres facultatifs premettent de limiter l’étendue de la recherche en spécifiant une position de départ et une position d’arrivée à l’intérieur de la chaîne à explorer (nombre de caractères à explorer).

Dim sPhrase As String

        sPhrase = "mon meilleur ami est mon chien pollux"

        Console.WriteLine("la chaîne 'mon' a été trouvée en position " & sPhrase.IndexOf("mon"))

        Console.WriteLine("la chaîne 'mon' a été trouvée aussi en position " & sPhrase.IndexOf("mon", 1))

        'Console.WriteLine("la chaîne 'mon' n'a pas été trouvée en position " & sPhrase.IndexOf("mon", 1, 4))

        Console.Read()

La méthode Substring(a,b)

Elle permet d’extraire une portion de chaîne en spécifiant le point de départ et le nombre de caractères à extraire.

Exercice 2

Ecrire un programme qui retourne la position d’un mot dans une chaîne de caractère saisi par l’utilisateur et qui fait l’extraction à partir de ce mot.

Solution

Console.WriteLine("taper votre chaîne")

        Dim S1 As String = Console.ReadLine

        Console.WriteLine("taper le mot recherché")

        Dim S2 As String = Console.ReadLine

        Console.WriteLine("Votre chaine est : " & S1)

        Console.WriteLine("le mot " & S2 & " a été trouvée en                      

                           position " & S1.IndexOf(S2))

       

        Console.WriteLine("la chaine demandée est : " &      S1.Substring(S1.IndexOf(S2), S1.Length - S1.IndexOf(S2)))

        Console.Read()

La méthode Replace

Sert à remplacer une chaîne de caractère par une autre.

S.replace(chaine_à_remplacer,chaine_remplaçante)

Exemple:

Dim S as string= "Visual_Basic"

S= S.Replace("_"," " ) ‘Donne S= "Visual Basic"

La méthode Insert

Elle permet d’insère une chaîne dans une autre.

S.Insert(indice_insertion,chaine_à_inserer)

Exemple:

Dim S as string= "VisualBasic"

S= A.Insert(6," " ) ‘Donne S= "Visual Basic"

La méthode Split

Découpe en plusieurs sous Chaînes une chaîne de départ, cela par rapport à un séparateur.

Conversion de type :

On peut faire la conversion de deux moyens différents : les méthodes associées aux types et les fonctions intégrés du langage.

- Les fonctions

Numérique -> String

Souvent nous sommes ramené à afficher des résultats sur des label qui ne supporte que le format String, dans ce cas nous sommes obligé de convertir la variable en format String en passant par la méthode ToString

Dim I As Integer=12 'On déclare une variable I qu'on initialise à 12 Label.text = I.ToString

-   Les méthode associé au type

Dim I As Integer=12

Label.text = String.parse(I)

On peut aussi utiliser, d’une manière plus simple, CType pour convertir n’importe quel type en n’importe quel type :

Ctype(Variable_à_convertir,Type_souhaité)

Dim i As Double = 1.2354

Dim j As Integer = Ctype(i,Integer)

CType fait toutes les conversions, mais on peut aussi utiliser des fonctions qui sont spécifiques au type de la variable de retour: Le nom de ces fonctions contient le nom du type de la variable de retour.

CBool(), CByte(), CChar(), CDate(), CDbl(), CDec(), CInt(), CLng(), CObj(), CShort(), CSng(), CStr()

Pour convertir l’entier I en Double on écrit : CDbl(I)

La casse System.Convert permet la conversion d'un type de base vers un autre:

Exemple

Pour convertir un Single en Byte (entier 8 bits non signé).ToByte

Pour convertir un Byte en Single: .ToSingle

singleVal = System.Convert.ToSingle(byteVal)

Execrie 3

Ecrire un programme qui permet de convertir une donnée saisie par l’utilisateur en un type de donnée choisie aussi par l’utilisateur.

Les Fonctions mathématiques

Pour qu'elles soient disponibles il faut d’abord importer l’espace de nom 'Math' : Pour cela il faut taper en haut de la fenêtre (au dessus de public Class) Imports System.Math

Abs(N) retourne la valeur absolu

Sign(N) retourne le signe

Round(N) retourne le nombre entier le plus proche

Max(2,3) retourne le plus grand des 2 nombres -> retourne 3

Min(2,3) retourne le plus petit des 2 nombres -> retourne 2

Pow(2,3) retourne 2 puissance 3 -> retourne 8

Sqrt(9) retourne la racine carré -> retourne 3