如何动态添加事件的问题
Dim butt As New System.Windows.Forms.ButtonMe.Controls.Add(butt)
butt.Name = "buttel1"
butt.Visible = True
butt.Enabled = True
下面如何给butt添加单击事件或双击事件
Dim butt As New Windows.Forms.Button Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.Controls.Add(butt) butt.SetBounds(Button1.Left + Button1.Width, Button1.Top, Button1.Width, Button1.Height) butt.Text = "新增的按钮" butt.Show() AddHandler butt.Click, AddressOf butt_Click End Sub Private Sub butt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) MsgBox("你单击的是刚才新建的按钮") End Sub