Vb.net 动态添加事件

这是一个我想要完成的任务

假设我有一个表单，其中有一个文本框来输入数字，还有一个名为“创建”的按钮 当用户输入一个数字并单击“创建”时，表单将填充文本框中输入的按钮数，并且按钮的标题用连续的数字标记

例如，如果输入5，表单将填充5个按钮，标记为button1、button2、…button5

当您单击这些新创建的按钮时，将弹出一个消息框，说明按钮名称

基本上，我需要知道如何创建事件，并用代码填充它们

动态地

请在针对windows应用程序而非web的解决方案中作出响应。没有JavaScript

---

请有人给出一个代码示例来回答这个想法对我来说有点模糊

这是windows而不是web对不起，“在这里添加事件”是什么意思？说这是一个点击事件，你可以添加代码吗……谢谢你的帮助！哦，那是身体…你能在活动身体里放些代码让我看一下吗？抱歉，这有点模糊，我的手机无法完全查看代码块…我知道你现在是怎么做的。再次感谢，非常高兴

        '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