Discussion :

[majo59]

Bonjour,

J'aimerai prendre une partie d'un string, mais pas la fonction MID ou autre...

En fait j'aimerai prendre une chaine de caractère jusqu'à un certain caractère.

Par exemple:

Chaine A: "azertyuiop;aze"
Chaine B: "az;zearzrguihsduirg"

Dans les 2 chaines, je ne veux que ce qu'il y a avant le ";"...

Je ne sait pas si c'est possible, j'ai un peu cherché sur le net mais bon... je ne trouve rien!

Merci d'avance

[Redouane]

Bonjour,

La fonction Split http://msdn.microsoft.com/fr-fr/library/b873y76a.aspx

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Dim A As String = "azertyuiop;aze"
Dim B As String = "az;zearzrguihsduirg"
 
' On divise A à un tableau de chaînes 
Dim result As String() = A.Split(";")
 
' On affiche le premier element du tableau
Console.WriteLine(result(0))

Si ça te dit pas, essaye de le faire à l'aide des expressions reguliers.

Bonne courage.

[Sehnsucht]

Bonjour,
Pour faire simple et rapide il y a la méthode SubString, conjointe avec IndexOf

Code VB.Net :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
        'Variables
        Const chaineA As String = "azertyuiop;aze"
        Const chaineB As String = "azertyuiopaze" ' Chaine sans ;
        Dim longueurA, longueurB As Integer
        Dim resultatA, resultatB As String
        'Récupération de la position du ; dans la chaine (-1 si non trouvé)
        longueurA = chaineA.IndexOf(";"c)
        longueurB = chaineB.IndexOf(";"c)
        'Test de vérification
        If longueurA = -1 Then
            resultatA = chaineA
        Else
            resultatA = chaineA.Substring(0, longueurA)
        End If
        If longueurB = -1 Then
            resultatB = chaineB
        Else
            resultatB = chaineB.Substring(0, longueurB)
        End If
        'Affichage
        MessageBox.Show(resultatA & vbCrLf & resultatB)

Les méthodes d'extension fournies par Linq pourraient être utiles:

Code VB.Net :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
        'Variables
        Const chaineA As String = "azertyuiop;aze"
        Const chaineB As String = "azertyuiopaze" ' Chaine sans ;
        Dim tempA, tempB As IEnumerable(Of Char)
        Dim resultatA, resultatB As String
        'Selection à l'aide de Linq et d'une fonction Lambda
        tempA = chaineA.TakeWhile(Function(c As Char) c.CompareTo(";"c) <> 0)
        tempB = chaineB.TakeWhile(Function(c As Char) c.CompareTo(";"c) <> 0)
        'Conversion pour affichage
        resultatA = Convert.ToString(tempA.ToArray())
        resultatB = Convert.ToString(tempB.ToArray())
        'Affichage
        MessageBox.Show(resultatA & "-" & resultatB)

En espérant avoir été utile!

[majo59]

Merci a vous deux.

Je n'ai pas testé ton code Sehnsucht, car le code de Redouane m'a l'ai beaucoup plus optimisé et ça marche

Merci pour l'aide

[Sehnsucht]

Merci a vous deux.

Je n'ai pas testé ton code Sehnsucht, car le code de Redouane m'a l'ai beaucoup plus optimisé et ça marche

Merci pour l'aide

Pas de souci, mais si tu lis bien le lien fourni par Redouane

Considérations sur les performances

Les méthodes Split allouent de la mémoire pour l'objet tableau retourné et un objet String pour chaque élément du tableau. Si votre application requiert des performances optimales ou si la gestion de l'allocation de mémoire est critique dans votre application, envisagez d'utiliser la méthode IndexOf ou IndexOfAny, et éventuellement la méthode Compare, pour localiser une sous-chaîne dans une chaîne.

Après c'est vrai que ça ralentis pas à mort non plus, au moins tu as plusieurs options comme ça

[majo59]

merci pour l'info.

javais lu en diagonale :p