从控制阵列中的按钮获取点击事件

Question

使用VB 2008 Express。

单击按钮时将代码附加到按钮上很容易，因为它们是表单上的静态按钮;只需双击表单设计器上的按钮并向事件添加代码即可。

我有一系列在控件数组中生成的按钮，所以它们是在类中生成的，并且在表单中没有按钮，直到运行时。

因此，新手问题可能很简单的答案......我如何才能为按钮的点击事件输入代码，直到它们在运行时实例化为类时才会出现？

Answer 1

我认为，你会这样做的常规按钮。

你想对每个按钮采取什么行动？如果每个按钮的操作都不相同，您能否举例说明它的样子？

编辑：原油代码领先

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
     Dim button As Button() 
     ReDim button(2) 

     Dim button1 As New Button 
     button1.Top = 0 
     button1.Height = 100 
     button1.Text = "hello" 

     Dim button2 As New Button 
     button2.Top = 200 
     button2.Height = 100 
     button2.Text = "world" 

     button(0) = button1 
     button(1) = button2 

     For i As Integer = 0 To 1 
      '** This is where all the buttons are tied, to a common handler 
      AddHandler button(i).Click, AddressOf doSomething 
     Next 

     Me.Controls.AddRange(button) 
    End Sub 


    Protected Sub doSomething(ByVal sender As Object, ByVal e As EventArgs) 
     Dim thisButton As Button 
     thisButton = sender 

     thisButton.BackColor = Color.DarkBlue 
     thisButton.Text = "clicked" 
    End Sub