蓝老师,您好:
groupbox1是窗口原来就存在的分组框,现在需要动态增加一个分组框,为此新建一个按钮button3,click事件为:
Dim gb As WinForm.groupbox
gb = e.Form.CreateControl("groupbox2", ControlTypeEnum.groupbox)
e.Form.AddControl(gb) '新形成一个分组框并加入窗口
Dim gb1 As WinForm.groupbox = e.Form.Controls("groupbox1")
gb.width = gb1.width '定义新分组框的宽度
gb.Height = gb1.Height '定义新分组框的高度
gb.left = gb1.left '定义新分组框的左界限
gb.top = gb1.top + 170 '定义新分组框的上界限
点击此按钮后,在原有的groupbox1下面会形成一个新的分组框,和代码定义一致,但样式不一样(如图),如何让新形成的分组框像上面的groupbox1一样