如何循环控制多个Button的click事件

 

  Dim MyButton(50) As Button 
        Dim i As Integer = 0 
        Dim x As Integer = 0 

        For i = 0 To Me.Controls.Count - 1 Step 1 
            MyButton(x) = Me.Controls(i) 
            AddHandler MyButton(x).Click, AddressOf Me.Run 
            x = x + 1 
        Next 

csdn上看到了 留存了