Dim Button = New Button()
        butCount = butCount + 1
        Button.Left = 10
        Button.top = 10
        Button.Name = "button" & CStr(butCount)
        Button.Size = New System.Drawing.Size(100, 50)
        Button.TabIndex = 1
        Button.Text = "Testbutton"
        Button.UseVisualStyleBackColor = True
        Me.Controls.Add(Button)