Salve a tutti
Sono Fabio
devo inserire diversi controlli dinamicamente in una form
in cui ho un contenitore flowlayout...
inoltre per ogni controllo devo aggiungere
una routine evento chiamata Prova_click
ma ottengo una form con un solo controllo visibilecodice:Public Class Form3 Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim count As Integer Dim btn As New Button For count = 1 To 5 With btn .Name = "Bottone" & count AddHandler .Click, AddressOf Prova_click End With FlowLayoutPanel1.Controls.Add(btn) Next End Sub Public Sub Prova_click() MsgBox("ciao") End Sub
la cui pressione genera 5 volte la MsgBox
Per quanto riguarda la creazione dei 5 bottoni ho provato così
e i bottoni vengono creati perfettamente:
ma non sò come ciclare correttamente anche la assegnazione della routine eventi
sapreste indicarmi la retta via ?codice:Dim count As Integer For count = 1 To 5 FlowLayoutPanel1.Controls.Add(New Button with {.name= "Bottone"& count}) Next End Sub
grazie anticipatamente per l'aiuto



Rispondi quotando