Nom d'un Item en Variable

Bonjour,
J'ai une série d'objet nommé :
Casier1 => Casier10

Je voudrais savoir comment faire pour remplacer les chiffres par une variable?
Pour que je puisse passer en revue mes objets avec une boucles For par exemple et modifier la propriété Visible de l'objet.

J'ai essayer comme en VBA:

[Casier" & i & "].Visible = True

mais le compilateur me jette, connaissez vous la syntaxe en VB.net ou une autre solution?

Merci d'avance

PS: j'ai 8 autres séries de 10 objet dans le même cas dans ce formulaire

Je ne crois pas qu'il soit possible de passer un paramètre directement dans un nom de variable, ou alors la solution m'intéresserait également.

Je suis passé personnellement par un switch ... case en C# qui s'appelle Select Case en VB.NET :)

Ca me parait aussi totalement impossible même avec la reflection.

Mieux vaut gérer une liste d'objets "Casier" (Code en C#)

Code:

---

1 2 3 4 5

List<Casier> Casiers=new List<Casier>() ; Casier.Add(Casier1) ; Casier.Add(Casier2) ; ...

---

Citation:

---

Envoyé par shaka17

Bonjour,
J'ai une série d'objet nommé :
Casier1 => Casier10

Je voudrais savoir comment faire pour remplacer les chiffres par une variable?

---

C'est impossible car ce que tu demandes est une vision spécifique aux langages de script et qui ne marche pas avec les langages compilés. (c'est le genre de syntaxe qui pue le php par exemple).

Pourquoi ne pas utiliser un tableau tout simplement ?

En effet, je n'arrive pas à imaginer un besoin fonctionnel dont la seule solution passerait par la création dynamique d'une variable.

Une solution, inexacte mais a explorer

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

For each MonControl As Control in Me.Form_Main   If MonControl.GetType = "Checkbox" Then   Dim MonNumeroControl as String = MonControl.Name   'Traitement sur la chaine pour avoir le numero ou je sais pas   if test(MonNumeroControl ) Then MonControl.visible=False Else MonControl.visible=True End If   End If   Next

---

Salut,

Si jamais tu y tiens c'est tout de meme possible de la faire via codedom, mais tu va vraiment devoir utiliser l'artillerie lourde m(ais dans le genre très lourd).

par rapport à ce qui a été dit :
le list est une bonne idée
par reflexion c'est faisable
codedom, faut vraiment être masochiste ^^

et sinon si c'est pour des controles sur le form :

Code:

---

1 2 3

for i as integer = 1 to 10 me.controls("Casier" & i).Visible = true next

---

tu pourrais aussi mettre tous ces controles sur un panel et donc les retrouver facilement, surtout si tu as plusieurs séries à traiter

Code:

---

1 2 3

for each c as control in panel.controls c.visible = true next

---

si c'est des controles que tu créés pendant l'exécution, tu peux les ajouter dans un list(of) en plus de faire .Controls.add()


NB : pour faire ce genre de choses avec des variables et non des controles, on peut utiliser un dictionary(of string, le type de tes objets)

Code:

---

1 2	dico.Add("variable 1",instance) dico("variable 1").propriété = value

---

NB2 :
poser plein de controles manuellement est rarement à conseiller, les créer par code est plus utile, au moins s'il faut en rajouter un un jour tu n'as qu'une ligne de code à modifier, alors que si tu le rajoutes à la main il faut modifier les bornes des For un peu partout dans le code
utiliser du code générique est plus maintenable que des choses "en dur" tels des For i = 1 to 10

Merci beaucoup pour toutes vos réponses et tous vos conseils. Je les apprécis vraiment beaucoup.
Finalement j'ai fais comme Pol63 à dit

Code:

---

1 2 3

for i as integer = 1 to 10 me.controls("Casier" & i).Visible = true next

---

C'était exactement ce que je cherchais, cela marche trés bien pour mes controls : TextBox et PictureBox qui sont des controls System.Windows.Forms
mais pas pour les dessins (rond, carré etc ...) qui sont des Microsoft.VisualBasic.powerPacks ne sont pas pris en compte avec Me.Controls

avez vous une idée?

grand merci en tout cas de votre aide.

faudrait que tu jettes un oeil dans le fichier designer (fichier caché par défaut, 2eme bouton dans l'explorateur de solution pour les voirs)
les shapes du powerpacks sont une bidouille :D (ce ne sont pas des controles)
donc faudrait voir dans quelle collection ils sont ajoutés pour la parcourir

ok c'est bon je les ai trouvé il sont dans :

Microsoft.VisualBasic.PowerPacks.OvalShape
Microsoft.VisualBasic.PowerPacks.RectangleShape

mais je ne sais pas comment les utiliser j'ai tapé:

Code:

---

Microsoft.VisualBasic.PowerPacks.OvalShape("Casier" & i).BackColor = Color.red

---

le compilateur me marque OvalShape est un type dans PowerPacks et ne peut être utilisé en tant qu'expression

Peux tu m'aider STP?

Merci

ovalshape c'est le type, tout comme textbox
tu dois d'ailleurs voir un new ovalshape, mais il faut trouver un .add(l'instance du ovalshape)
enfin si c'est basé sur un système de collection aussi

Merci beaucoup de ton aide.

Mais la je crois que c'est beaucoup trop compliqué pour moi ... Je vais essayer de contourner la difficulter avec des pictures box et des textbox.

C'est bon j'ai réussi en passant que par des controls picture box en plus c'est plus jolie, c'est mieux pour une fenêtre de supervision.

[En tout cas un grand merci au forum et à ceux qui aide les gens qui débute et galère comme moi
:ccool::P:ccool::P:ccool::P:ccool::P