小编Lab*_*abe的帖子

我已经找到了一些关于这个主题的信息，但我仍然没有完全理解它，如果有人能在我的例子中向我展示如何做到这一点，我会很高兴。

基本上，我在 VB.Net Windows 窗体应用程序中有一个充满对象的数组

Dim button(9) As cbuttons

public sub fill()
   button(1) = New cbuttons("buttonName1", 2, true)
   button(2) = New cbuttons("ButtonName2", 3, true)
   button(3) = New cbuttons("ButtonName3", 4, true)
   ...

此数组用作按钮的源，这些按钮是动态生成的

public sub writeButtons()
    For Each item As cbutton In button

        Dim cmbDynamic As New Button()
        cmbDynamic.Location = New System.Drawing.Point(item.getX(), item.getY())
        cmbDynamic.Name = item.getname()
        cmbDynamic.Text = item.getName() & vbCrLf & item.getTypeString()
        TabPage1.Controls.Add(cmbDynamic)
        AddHandler cmbDynamic.Click, AddressOf Me.clicked 'here is the problem

然后我有一个潜艇应该做这样的事情

public sub clicked()
  MessageBox.Show("You clicked on button " …