objets avec noms variables

Version imprimable

Bonjour,

je suis confronté à un problème qui n'existe pas en php..
Est il possible de réduire ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Select Case input(0)
            Case 1
                lbl_pgbar_1_act.Text = input(1)
                lbl_pgbar_1_progress.Text = input(3).ToString & "/" & input(2).ToString
                pgbar_1.Maximum = input(2)
                pgbar_1.Value = input(3)
            Case 2
                lbl_pgbar_2_act.Text = input(1)
                lbl_pgbar_2_progress.Text = input(3) & "/" & input(2)
                pgbar_2.Maximum = input(2)
                pgbar_2.Value = input(3)
                ...
                ...
                ...
        End Select

en quelquechose comme ça ?

Code:

1
2
3
4
                lbl_pgbar_input(0)_act.Text = input(1)
                lbl_pgbar_input(0)_progress.Text = input(3).ToString & "/" & input(2).ToString
                pgbar_input(0).Maximum = input(2)
                pgbar_input(0).Value = input(3)

Si oui, comment ? et est-ce consommateur de ressources (plus long à exécuter) ?

Merci d'avance :)

08/09/2011, 11h52
Pol63

en écrivant de la vraie POO tu n'aurais pas ce problème

toutefois ca reste possible via un system.collections.generic.dictionary(of T,T2)

T est une clé, T2 une valeur
dico.add(clé, valeur)
dico(clé) retourne la variable associée

genre dim textboxes as new dictionary(of integer, textbox)
textboxes.add(1,textbox1)
textboxes(1).text = ...

ou sinon les controles sont accessibles par leurs noms
me.controls("textbox" & input(0).tostring).text = ...
(remplacer me par le conteneur si différent, caster le control sur son type s'il est connu pour accéder à ses propriétés)

m'enfin le mieux reste d'apprendre la POO qui permet d'écrire des trucs plus propres ...
08/09/2011, 13h35
Bluedeep

Citation:

Envoyé par rebel29270

je suis confronté à un problème qui n'existe pas en php..

Non, tu n'es pas confronté à un problème; tu t'inventes un problème en tentant d'utiliser un langage compilé comme un langage de script.;)
08/09/2011, 15h22
rebel29270

Citation:

Envoyé par Pol63

en écrivant de la vraie POO tu n'aurais pas ce problème

je ne suis qu'a mes débuts en VB, ça va attendre un peu..
et si je continues a développer comme 9a, je passerai a du C ou autre ..
08/09/2011, 15h30
Pol63

Citation:

Envoyé par rebel29270

je ne suis qu'a mes débuts en VB, ça va attendre un peu..

attendre quoi ? si tu dois faire du vb.net et que tu dois le faire bien, apprend avant de coder, sinon ca ne sert à rien ... à part recommencer à zero une fois les connaissances acquises, pas certains que ca gagne du temps
08/09/2011, 15h36
rebel29270

je ne cherche pas a faire bien pour le moment mais juste, le plus rapidement possible, un programme qui fonctionne pas trop mal...

quand j'aurais le temps, je le redévelopperai plus proprement et dans les règles de l'art dans un autre langage.
12/09/2011, 20h43
rebel29270

Bonjour à tous,

il semblerait que le code :

Code:

me.controls("textbox" & input(0).tostring).text = ...

ne fonctionne pas avec les objets à l'intérieur d'un tabcontrol ..

est-ce normal ? :s
12/09/2011, 22h40
Pol63

me.controls retourne les controles sur me (le form en général)
déjà si tu mets un bouton dans un panel, me.controls ne contiendra pas le bouton, il sera dans lepanel.controls
les tabpages sont dans letabcontrol.pages ou un truc dans le genre
13/09/2011, 08h39
rebel29270

merci pour votre aide à tous :)