Site:

Cours VB.net

1.19.2

Contrôle des connaissances. String, Char.

Questions:

2- String, Char.

2.1 Créer une variable 's'  de type String contenant "   45.12  ", éliminer les espaces de début et de fin, remplacer le point par une virgule si il y a un point.

2.2 Créer une variable s de type String, l'initialiser avec "Philippe", afficher dans une Messagebox la longueur de la chaîne.

2.3 Créer une variable ch de type Char, y mettre le caractère "2", afficher sur la console True ou False si ch est un chiffre, une lettre.

2.4 Créer une variable s de type String, l'initialiser avec "Philippe Dubout". Tester s'il y a un espace dedans, si oui mettre les 2 mots dans un tableau (avec l'instruction Split). Mettre les 2 mots en majuscules. Mettre les 3 premières lettres du premier mot dans une nouvelle variable  'm' puis l'afficher dans une MessageBox. Si le second mot se termine par 'BOUT' afficher 'Se termine par bout'.

Réponses:

2- String, Char.

2.1 Créer une variable 's' de type String contenant "   45.12  ", éliminer les espaces de début et de fin, remplacer le point par une virgule si il y a un point.

Dim s As String= "   45.12  "

s= s.Trim(" ")

If s.Contains(".") Then

    s= s.Replace(".","," )

End If

2.2 Créer une variable s de type String, l'initialiser avec "Philippe", afficher dans une MessageBox la longueur de la chaîne

Dim s As String ="Philippe"

MsgBox(s.Length.ToString)

s.length retournant un entier, il faut le transformer en chaîne de caractères (grâce à .ToString) pour l'afficher.

2.3 Créer une variable ch de type Char, y mettre le caractère "2", afficher sur la console True ou False si ch est un chiffre, une lettre.

Dim ch As Char
ch = "2"c
Console.WriteLine(Char.IsDigit(ch))                       ' Output: "True"'  Est un chiffre
Console.WriteLine(Char.IsLetter(ch))                      ' Output: "False"' n'est pas  une lettre

2.4 Créer une variable s de type String, l'initialiser avec "Philippe Dubout". Tester s'il y a un espace dedans, si oui mettre les 2 mots dans un tableau (avec l'instruction Split). Mettre les 2 mots en majuscules. Mettre les 3 premières lettres du premier mot dans une nouvelle variable  'm' puis l'afficher dans une MessageBox. Si le second mot se termine par 'BOUT' afficher 'Se termine par bout'.

Dim s As String ="Philippe Dubout"

Dim m As String

If  s.Contains( " ") Then

   Dim mot() As String=s.Split(" "c)

     mot(0)= mot(0).ToUpper

     mot(1)= mot(1).ToUpper

     m = mot(0).Substring(0, 3)

    MsgBox (m)

    If  s.EndsWith ("BOUT")

        MsgBox ("Se termine par BOUT")

     End If 

End If

Remarquer que Split fonctionne avec comme séparateur des caractères et non des String (d'ou le " "c et non le " ").

Notons aussi que, comme avec SubString, une chaîne commence par le caractère numéro 0.