sizechanged事件,写如下代码
Dim frm = e.Form.panel.parent.parentIf frm IsNot Nothing Then frm.height = e.Form.heightEnd If