Public Class ButtonArray
    Inherits System.Windows.Forms.Control
 
---Dies gilt nur für Form. Wie geht es auch anders?
    Public h As System.Windows.Forms.Form
---
 
    Public Sub AddNewButton()
        Dim button As New System.Windows.Forms.Button
 
        coll.Add(button)
 
------ ???????????
        [u]h.Controls.Add(button)
------
 
        With button
            .Text = Text
            .....
        End With
 
        AddHandler button.Click, AddressOf MyButton_Click
 
    End Sub
 
    Private Sub MyButton_Click(ByVal sender As Object, ByVal e As EventArgs)
        MessageBox.Show("Sie wählten Schaltfläche " & CType(CType(sender, _
          Button).Tag, String))
    End Sub
 
---- ???????????
    Public Sub New(ByVal host As System.Windows.Forms.Form)
        h = host
    End Sub
----
 
      ....
      ...
      ...
 
End Class