Public WithEvents Schaltflaeche111 As Button = New Button
 
AddHandler Schaltflaeche111.Click, AddressOf Me.Schaltflaeche111_Click
ZelleNeu.Controls.Add(Schaltflaeche111)
 
Public Sub Schaltflaeche111_Click(sender As Object, e As System.EventArgs) _
  Handles Schaltflaeche111.Click
        Response.Write("TEST")
End Sub