Discussion :

[afrodje]

Bonjour,
Je cherche à créer un control (par exemple button) dynamiquement car il y aura autant de button que d'enregistrement dans ma base de donnée.

J'ai sorti cela mais ça ne marche pas et ça me parait léger.

Code :

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

1
2
3
4
5
6
 
        Dim test As New Button
        test.Left = 50
        test.Top = 20
        test.Text = "monbutton"
        test.Show()

Merci

[wakan]

Bonjour,
As-tu regardé ce topic :
http://www.developpez.net/forums/d32...bouton-action/
A bientôt

[afrodje]

Merci du lien mais je n'ai qu'un control à l'ecran alors que je devrais en avoir 4.

Code :

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

1
2
3
4
5
6
7
8
9
10
        Dim btn_Bouton As Label
        For intI As Integer = 1 To nb_enregistrement
            btn_Bouton = New Label
            btn_Bouton.Name = "Label" & intI.ToString
            btn_Bouton.TabIndex = intI
            btn_Bouton.Text = "Clic"
            MsgBox("test")
            btn_Bouton.Top = (20 + intI * 10)
            Panel_list.Controls.Add(btn_Bouton)
        Next

La boucle est bien exécuté 4 fois car la MsgBox s'affiche 4 fois

Comment est ce possible?
Merci

[Pol63]

tes 4 controles sont au meme endroit c'est pour ca que tu n'en vois qu'un
il faut donc leur attribuer une place
ou en plus simple les mettre dans un flowlayoutpanel

[afrodje]

Mais grâce à btn_Bouton.Top = (20 + intI * 10), ils se trouvent les uns en dessous des autres, non?

[smyley]

Rajoute btn_Bouton.AutoSize = True pour voir.

[Pol63]

Mais grâce à btn_Bouton.Top = (20 + intI * 10), ils se trouvent les uns en dessous des autres, non?

j'avais pas fait gaffe mais essaye * 100 plutot que * 10