événements Ajout dynamique

Question

est ici un scernerio qui obtenir ce que je suis en train d'accomplir ....

Dire que j'ai un formulaire avec une zone de texte pour entrer un numéro et un bouton appelé « Créer » Lorsqu'un utilisateur entre un nombre et des clics créent le formulaire est rempli avec le nombre de boutons entrés dans la zone de texte et le titre des boutons sont étiquetés par des numéros consécutifs.

Par exemple, si vous entrez 5 la forme renseignera avec 5 boutons marqués button1, button2, ... button5

Lorsque vous cliquez sur ces boutons nouvellement créés messageBox sera Popup indiquant le nom des boutons.

Fondamentalement, je besoin de savoir comment créer des événements et les remplir avec le code Je suppose que

dynamiquement.

S'il vous plaît répondre dans une solution pour une application Windows pas web. Pas de JavaScript.

S'il vous plaît quelqu'un peut répondre par un exemple de code cette idée est un peu brumeuse me

Answer 1

 'Make sure that the textbox contains a number. 
    If IsNumeric(TextBox1.Text) Then 

     'Make sure that it's a positive number. 
     If CInt(TextBox1.Text) > 0 Then 

      For i = 1 To CInt(TextBox1.Text) 

       Dim x As New Button 
       x.Name = "Button" & i.ToString 
       x.Top = 100 + (i * 30) 'To avoid stacking. 
       AddHandler x.Click, AddressOf y 'Add the event here. 

       'Add it to the form. 
       Controls.Add(x) 

      Next 

     End If 

    End If 

    Private Sub y(ByVal sender As System.Object, ByVal e As System.EventArgs) 

    MsgBox(CType(sender, Button).Name) 

End Sub