主题：[求助]窗口按钮代码（已解决）

窗口的AfterLoad事件代码：

Dim ct As New Windows.Forms.Button

ct.Text = "我的按钮"

e.Form.Panel.Controls.Add(ct)

AddHandler ct.Click, AddressOf Button1_Click

意思是复制一个窗口已经存在的控件?

是的，不要自动生成按钮。

可以从其他窗口复制过来 e.Form.AddControl(Forms("窗口2").Controls("CheckBox1"))

我的意思是，不要在窗口自动添加按钮，而是将窗口现有的按钮来实现同样的功能，请老师指教。

Dim but As WinForm.Button = e.Form.Controls("Button2")
AddHandler but.BaseControl.Click, AddressOf Button1_Click

谢谢逛逛老师，问题解决，再次衷心感谢！！