Bonsoir, j'ai une chaine qui peu se présenter sous deux facons :
ou124 RUE DE LA PRAIRIE (REMELANGE)
et je souhaite avec une fonction retirer ce qui se trouve entre parenthèse d’après un tableau de string qui contient ce que je dois enlever entre panthése, dans ma chaîne, mais je n'ai pas tous le temps des parenthèse.25 RUE DE PARIS
alors voici ma fonction :
Le problème avec cette fonction c'est quelle me retourne toujours l'adresse au complet meme avec les parenthése et le lieu que j'ai dans mon tableau !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim parenthese_ville() As String = {"ST NIC. FORET", _ "REMELANGE", "KONACKER", "MARSPICH", "OURY NORD", "HT. PONT", "OURY SUD", "EBANGE", "OURY", "VOLKRANGE", "OLYMPE 2", "CITE BOSMENT", _ "EDANGE", "MORLANGE", "BUDANGE", "MINE VICTOR", "BURE", "METRICH"} Function traitement_adresse(ByVal Texte As String) As String Dim resultat As String = "" For i As Integer = 0 To parenthese_ville.Length - 1 If Texte.Contains("(" & parenthese_ville(i) & ")") Then resultat = Texte.Replace("(" & parenthese_ville(i) & ")", "") ElseIf Texte Then resultat = Texte End If Next Return resultat End Function
je ne comprend pas ou j'ai fait une erreur ????
Partager