Discussion :

[t1marlartiste]

Bonjour,

Je souhaiterais créer un index pour mes textbox et Label.

Je m'explique, j'ai une cinquantaine de label + textbox afficher suivant une base de données.En faite, je récupére des données que je voudrais insérer dans mon label et textBox. Ca je sais faire (ouf) , mais je souhaiterais que l'ajout se faire dynamiquement cad par répéter

Code :

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

1
2
3
TextBox1.text = ....
TextBox2.text= ....
TextBox3.text=....

Je voudrais un résultat du style

Code :

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

Textbox(i).text = ....

Je savais le faire en VB , mais la je ne sais pas ou je ne sais plus.. Et je ne sais pas si cela est possible...

J'attend vos réponses, merci

[zooffy]

Ben j'aimerais bien faire pareil, mais je croyais que c'était pas possible.

Donc, effectivement si quelqu'un sait comment faire, je suis preneur aussi du code.

Je tenterais bien une idée en prenant une Collection de TexteBox et de Label, mais je sais pas trop comment mettre ça en oeuvre.

[Pol63]

ca n'est pas possible de les poser indexés comme sous vb6
mais c'est encore possible par code

cette question arrive plusieurs fois par semaine et à chaque fois y la réponse
j'y ai encore répondu ajourd'hui ou hier, cherchez dans le coin ou un sous forum ...

[t1marlartiste]

J'ai trouver ça de toi, mais ca ne fonctionne pas...

Code :

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

1
2
3
4
5
6
        Dim mesboutons() As Button
        Dim i As Integer = 0
        For i = 0 To 10
            mesboutons(i) = New Button
            Me.Controls.Add(mesboutons(i))
        Next

Une idée?

[Pol63]

si si ca marche mais comprendre pour adapter

quand je déclare mesboutons() as button
je dis que j'en ai plusieurs mais il faut dire combien
soit à la déclaration dim mesboutons(10) as button
soit plus tard
redim mesboutons(5)
redim preserve mesboutons(10)

[t1marlartiste]

Voila ce que j'ai écrit :

Code :

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

1
2
3
4
5
6
7
        Dim mesboutons(0) As Button
        Dim i As Integer = 0
        For i = 0 To 10
            mesboutons(i) = New Button
            Me.Controls.Add(mesboutons(i))
            ReDim Preserve mesboutons(i + 1)
        Next

J'ai une autre erreur :

Le contrôle '_ctl0' de type 'Button' doit être placé dans une balise form avec runat=server.

gné?