Creare in modo dinamico un bottone e una label in un panel

di il
7 risposte

Creare in modo dinamico un bottone e una label in un panel

Buongiorno a tutti,
vorrei riuscire a creare un panel, con all'interno un bottone e una label al di sotto del bottone ma sempre all'interno del panel; poi cliccando il pannello, devo prendere in considerazione il testo della label che è al suo interno.
Malgrado i miei sforzi, mi visualizza all'interno del panel o il bottone, o la label, ma non capisco l'errore, posto il codice:

                                public sub dinamic () 
                               Dim btn As New Button
                               Dim pannello As New Panel
                               Dim label As New Label
                                
                                pannello = New Panel
                                pannello.Height = 140
                                pannello.Width = 157.5
                                AddHandler pannello.Click, AddressOf MyPannello_Click
                                btn = New Button                   
                                btn.FlatAppearance.BorderSize = 3
                                btn.FlatAppearance.BorderColor = Color.Green
                                btn.FlatStyle = FlatStyle.Flat
                                btn.Height = 80 
                                btn.Width = 157.5  
                                pannello.Controls.Add(btn)
                                label = New Label
                                label.Font = New Font(label.Text, 5)
                                label.Text = "ciao"
                                pannello.Controls.Add(label)
                           end sub

7 Risposte

Devi accedere o registrarti per scrivere nel forum
7 risposte