昨天我给别人写的一个添加在面板里的,您自己改一下就可以用:
Dim bn As WinForm.Buttonbn = e.Form.CreateControl("Button1", ControlTypeEnum.Button)bn.Left = 20bn.Top = 50bn.Text = "确定"bn.FlatStyle = FlatStyle.Flat '只有在平面样式的时候才可以设置背景颜色bn.BackColor = Color.Transparentbn.BorderSize = 1e.Form.Controls("Panel1").AddControl(bn)