Discussion :

[Krys9292]

Bonjour à tous,

Est-il possible de faire pointer directement une variable (de nom défini fixe) vers l'adresse d'une autre variable créée en amont en n'ayant que le nom de cette dernière dans une string ?
Existe-t-il une méthode genre AdressOf qui ferait pointer ma variable fixe vers la variable dont j'obtiens le nom dans une string ?
En gros, le même genre de comportement que Me.Controls("blablabla") pour les controls.

Ou faut-il passer par la déclaration d'un dictionnaire, le remplir et faire : variable fixe = dictionnaire.item("StringduNomdelaVariable") ?

Autre question, s'il faut passer par un dictionnaire, si je modifie ma variable "fixe", est-ce que la variable en amont (son nom dans la string) subit les mêmes modifications ?

Je vous remercie de toutes vos aides.

[Thumb down]

Bonjour,
Qu'entends tu par variable créée en amont?
Un exemple contextuel serait le bienvenu.

[Krys9292]

Bonjour Thumb down,

En fait, je récupère le nom de la variable qui m'intéresse en fonction d'éléments en amont.
Son nom est dans une string.
Et ensuite, je veux atteindre le contenu de cette variable.

Un peu comme on le fait avec

Code :

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

Me.Controls("Button" & i.ToString)

par exemple pour un bouton.

Je me suis renseigné, il y a les dictionnary.
Mais je me demandais s'il n'existait pas une méthode plus directe.
Peut-être qui utilise les adresses... genre

Code :

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

AddressOf("NomVariable" & i.ToString)

?

Je ne sais pas.
Tout ce que j'ai trouvé ce sont les dictionnaires.

[Thumb down]

Désolé, mais j'ai l'impression d'être une personne âgé à qui on répète la même phrase en augmentant la voix pour palier à sa sourdité !

Tu déclarer une variable quelque part et ensuite tu est capable de transmettre son nom et pas la variable ????

Je réitère ma demande, peux-tu nous donner un exemple de code qui materialiserait ton problème ?

C'est tellement facile de passer une variable en paramètres,que je ne comprends pas ta demande

En fait tu nous exposes ta solution et pas ton problème.

Code :

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

Me.Controls("Button" & i.ToString)

[Krys9292]

Thumb down,

Désolé, mais j'ai l'impression d'être une personne âgé à qui on répète la même phrase en augmentant la voix pour palier à sa sourdité !

Désolé, en fait si je n'ai pas mis le code, c'est parce qu'il est assez long, sur plusieurs modules, et je ne voulais pas charger le post.

En gros, je déclare 6 ArrayList, une par CheckedListBox :

Code :

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

Private List1, List2, List3, List4, List5, List6 As New ArrayList

Ces ArrayList recevront les CheckedIndices de la CheckedListBox concernée dès l'évènement .ItemCheck activé.
Le traitement sur chaque CheckedListBox et sur les ArrayList est identique, donc j'ai standardisé le traitement pour ne pas multiplier le code 6 fois.

Code :

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

1
2
3
4
5
6
7
8
9
 Private Sub SSCLBoxCochageChange(SSCLBox As CheckedListBox, e As EventArgs) Handles CheckedListBox11.ItemCheck, CheckedListBox12.ItemCheck, CheckedListBox13.ItemCheck, CheckedListBox14.ItemCheck, CheckedListBox15.ItemCheck, CheckedListBox16.ItemCheck
 
        'Charge la liste des éléments validés
        ListClick.Clear()
        ListClick.AddRange(SSCLBox.CheckedIndices)
 
        Exit Sub
 
    End Sub

Chaque CheckedListBox est différente en termes de données et de volumes de données. Donc chaque ArrayList va être différent sur ce plan.
Le traitement reste le même pour toutes, seule change au final le numéro de la CheckedListBox sélectionnée.

J'ai donc créé qu'un seul évènement lié à .ItemCheck pour l'ensemble des 6 CheckedListBox.
Et en fonction du numéro de la CheckedListBox sélectionnée, je sais quel ArrayList doit être utilisé et rempli.

Je crée donc un ArrayList générique (ListCheck) que je veux lier temporairement au bon ArrayList concerné :

Code :

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

ListClick As New ArrayList

Et je veux traiter l'info contenu dans ce ListClick.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 With DirectCast(Me.Controls("CheckedListBox1" & NumFlecheClick.ToString), CheckedListBox)
                    'Gèle les évènements de la SSCLBox concernée pour ne pas modifier ListClick
                     RemoveHandler .ItemCheck, AddressOf SSCLBoxCochageChange
 
                    For Each Index As Integer In .CheckedIndices
                        .SetItemCheckState(Index, False)
                    Next
                    For Each Index As Integer In ListClick
                        .SetItemChecked(Index, True)
                    Next
End With

Mon soucis, c'est que je n'ai accès au ArrayList concerné que par construction de son nom ("List" & NumFlecheClick.ToString).
Et je dois l'associer à ListCheck générique pour traitement.

Du coup, j'ai créé un dictionnaire :

Code :

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

Private DictionnaireList As New Dictionary(Of Integer, ArrayList)

Je l'ai rempli pour faire correspondre le numéro de la CheckedListBox sélectionnée (contenu dans NumFlecheClick) à la bonne ArrayList :

Code :

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

1
2
3
4
5
6
7
'Incrémente le dictionnaire de ArrayList
        DictionnaireList.Add(1, List1)
        DictionnaireList.Add(2, List2)
        DictionnaireList.Add(3, List3)
        DictionnaireList.Add(4, List4)
        DictionnaireList.Add(5, List5)
        DictionnaireList.Add(6, List6)

Et ensuite je fais le lien :

Code :

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

1
2
3
 'Pointe vers la bonne ArrayList
                ListClick = Nothing
                ListClick = DictionnaireList.Item(NumFlecheClick)

Je demandais juste s'il existait une méthode plus directe ?
Peut être avec un pointage directement sur l'adresse de la bonne ArrayList ?
Ou s'il fallait passer forcement par un dictionnaire comme je l'ai fait.

Bien à toi

[Phil Rob]

Bonsoir,

Depuis le début, le problème énoncé (si on peut dire) me fait penser à l'usage des pointeurs en C. Ils permettent de passer l'adresse d'une variable plutôt que sa copie.
Lors de la définition des paramètres en VB.Net, l'emploi des "vitamines" ByRef ou ByVal permet aussi de faire la différence entre le contenu d'une variable et sa copie. Cela est vrai pour les types de base et les chaînes qui sont ByVal par défaut (je crois). Sauf erreur de ma part, l'opérateur AddressOf ne sert pas de pointeur de variable.

Peut-être que ceci se rapporte au problème....

[Thumb down]

et comme ça?

Code List(0-5) :

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

Private List() As ArrayList = {New ArrayList, New ArrayList, New ArrayList, New ArrayList, New ArrayList, New ArrayList}

[Krys9292]

Merci Thumb Doxn !

En fait, je ne savais pas qu'on pouvait faire des Lists de Lists indépendantes.
Ca répond exactement à mon problème, qui n'en était pas un finalement...

Désolé de t'avoir fait passer pour un vieux