Discussion :

[koukoula]

Bonjour,

J'ai une question assez simple :

Comment faire pour que quand on exécute ce code :

Code :

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

1
2
3
4
                    Dim abc As String = "toto"
                    Dim tab As New ArrayList
                    tab.Add(abc)
                    tab.Item(0) = "tutu"

abc soit elle aussi modifié.

Pour être plus clair : Comment modifier une variable String stockée dans un tableau par référence ?

[SaumonAgile]

Les chaines de caractères sont toujours passées par valeur.

[StormimOn]

Les chaines de caractères sont toujours passées par valeur.

Pour être plus précis string est un type référence mais la particularité qui nous intéresse ici c'est que les chaînes de caractères sont "immuables". Cela signifie que l'on ne peut pas modifier une chaîne existante, elle est en lecture seule. D'ailleurs, toutes les méthodes servant à manipuler les chaînes (Trim, Replace, ...) renvoient une nouvelle chaîne, ce n'est pas pour rien

Bref string est un type référence mais, du fait de "l'immuabilité", l'ensemble se comporte comme un type valeur.

Petite parenthèse, ce comportement peut poser problème, lorsque l'on ne le connait pas et que l'on commence à faire beaucoup d'opérations sur une chaîne, car chaque modification va réallouer une nouvelle chaîne (du fait de l'immuabilité) et on peut vite encombrer la mémoire provoquant ainsi dans le meilleur des cas des lenteurs et dans le pire des cas ...

Et, dans le cadre de la parenthèse, c'est pour cela que la classe StringBuilder existe.

[SaumonAgile]

Pour être plus précis

Diantre, on ne peut même plus être imprécis tranquillement ici.
Cela dit, merci de m'avoir corrigé, j'avais fait un raccourci un peu rapide.

[Pol63]

Code :

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

1
2
3
4
                    Dim abc As Object = "toto"
                    Dim tab As New ArrayList
                    tab.Add(abc)
                    tab.Item(0) = "tutu"

as object doit fonctionner
à voir si ca peut aller avec le reste de ton code ...

[koukoula]

Merci pour vos réponses, mais je n'ai toujours pas de solution, ni le fais d'utiliser StringBuilder ni le fais de convertir un Objet en String ne marche...

[StormimOn]

Merci pour vos réponses, mais je n'ai toujours pas de solution

Tout simplement parce qu'il n'est pas possible de faire ce que tu souhaites

[koukoula]

Vive le C++^^

Non plus sérieusement, j'essaye de simplifier tout ça :

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
16
            ' Initialise les paramètres par défaut
            If CType(settingsModule("DataSource"), String) <> "" Then
                strDataSource = CType(settingsModule("DataSource"), String)
            Else
                strDataSource = Localization.GetString("DataSource", LocalResourceFile)
                objModules.UpdateModuleSetting(ModuleId, "DataSource", strDataSource)
            End If
 
            If CType(settingsModule("SQLSelect"), String) <> "" Then
                strSQLSelect = CType(settingsModule("SQLSelect"), String)
            Else
                strSQLSelect = Localization.GetString("SQLSelect", LocalResourceFile)
                objModules.UpdateModuleSetting(ModuleId, "SQLSelect", strSQLSelect)
            End If
.....
.....

Et faire une boucle simplifiant ET la compréhension ET allégeant le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim nomVar() as String = {"DataSource", "SQLSelect", ...}
Dim groupeVar() as String = {strDataSource, strSQLSelect, ...}
 
            For i as Integer To nomVar.length
                If CType(settingsModule(nomVariable(i)), String) <> "" Then
                    groupeVar(i) = CType(settingsModule(nomVariable(i)), String)
                Else
                    groupeVar(i) = Localization.GetString(nomVariable(i), LocalResourceFile)
                    objModules.UpdateModuleSetting(ModuleId, nomVariable(i), groupeVar(i))
                End If
            Next

Pas possible ?????

[Pol63]

par réflection ca doit surement etre faisable

[koukoula]

Mais sans "pointeurs" je ne vois pas comment...

[Pol63]

la reflection peut quasiment tout faire
si tu as le nom de la variable et l'instance de la classe contenant la variable, il suffit ensuite de faire SetValue

[koukoula]

Bon, je regarde ça :

http://emerica.developpez.com/dotnet...duction/vbnet/

[Pol63]

si tu trouves pas c'est

Code :

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

instance.GetType.GetField("nom_de_la_variable",flags_qui_vont_bien).SetValue(instance,valueToSet)

flags_qui_vont_bien ca depend de ta variable, public or nonpublic or instance ca marche bien en général

[koukoula]

ok merci impec !