Ne prendre qu'une partie d'un String

Version imprimable

16/02/2010, 09h29
majo59

Ne prendre qu'une partie d'un String

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

Bonjour,

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

Exemple :
Code:

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.

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

Code:

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:

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!

16/02/2010, 10h24
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
16/02/2010, 10h32
Sehnsucht

Citation:

Envoyé par 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

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

Citation:

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 ;)
16/02/2010, 10h57
majo59

merci pour l'info.

javais lu en diagonale :p