[VB.NET] Créer un index textbox/Label

Version imprimable

07/06/2007, 16h08
t1marlartiste

[VB.NET] Créer un index textbox/Label
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:

1 2 3 TextBox1.text = .... TextBox2.text= .... TextBox3.text=....
Je voudrais un résultat du style

Code:

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
07/06/2007, 16h46
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.
07/06/2007, 17h20
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 ...

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

Code:

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?

08/06/2007, 11h48
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)

Voila ce que j'ai écrit :
Code:

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 :

Citation:

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

gné?

Bonjour

Partant dans l'idée que ta page aspx se présente comme suit

Code:

1
2
3
4
5
6
7
8
9
10
 
...
<body>
    <form id="form1" runat="server">
    <div>
        .....
    </div>
    </form>
</body>
...

ta boucle peut se présenter comme ça :

Code:

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

Bon courage ;)

08/06/2007, 15h07
t1marlartiste

Il ne reconnait pas mon formulaire . Il est également du meme nom (form1). Mais il me dit que ce n'est pas un membre de ma page... Alors que j'ai bien vérifié et il y est bien...

Galere galere
08/06/2007, 15h36
mafyoso

(Re) Bonjour

Pourrais-tu nous envoyer ton entete de page ?
Est-ce que le code VB détecte un seul des controls serveur qui sont dans ta page aspx :? ?

A suivre ;)
08/06/2007, 15h46
Pol63

j'avais pas vu que ca parlait d'asp mais en théorie ca doit marcher aussi

sinon tu as fait dim mesboutons(0) as button
ca veut dire que t'en veux qu'un (de 0 à 0)
donc si tu appelles plus loin mesboutons(1) (pour le i de 0 à 10)
ca va planter

dim mesboutons(10) va créé un tableau de 11 boutons (de 0 à 10)

voici l'entete de ma page

Code:

1
2
<%@ Register TagPrefix="cr" Namespace="CrystalDecisions.Web" Assembly="CrystalDecisions.Web, Version=9.1.5000.0, Culture=neutral, PublicKeyToken=692fbea5521e1304" %>
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="ajout_fournisseur.aspx.vb" Inherits="Automatisation_palettes.ajout_fournisseur"%>

Et sinon,oui , mon code VB détecte bien les controls serveur qui sont dans ma page aspx

08/06/2007, 16h26
mafyoso

Ok, dans quel évènement appelles-tu ta génération de bouton ;) ?
11/06/2007, 08h47
t1marlartiste

Je l'apelle au chargement de la page..
Voila
14/06/2007, 09h09
t1marlartiste

Le problème a était contourné ... Merci pour vos réponses 8-)