VB窗体扩展问题........!

VB可以通过form.height方法进行高度调整,
但都是在原有height的基础上向下方扩展,
请问有办法向上扩展吗? (不移动窗体上现有所有控件的位置)

---

只要向上扩展了,一定就要改变窗体上现有控件的位置(因为这个位置一定是相对于窗体左上角坐标来说的)

---

引用

只要向上扩展了,一定就要改变窗体上现有控件的位置(因为这个位置一定是相对于窗体左上角坐标来说的)

vb的坐标是左上角(x,y)为(0,0),向上调,控件坐标都会变动. 新手问的问题五花八门,很有想象力呀

---

lz可以加一个frame，把所有的控件放入frame中，需要向上扩展时，把frame的top修改就可以了

---

樓主先說說為何一定要不移動窗體呢?

---

帮顶先

---

form.top = form.top - 300

---

进行高度调整

引用

form.top = form.top - 300

---

可以这样做：

VB code:
'假设你希望你的窗体向上扩展300'
Form.Top = Form.Top - 300
For Each ctl In Me.Controls
ctl.Top = ctl.Top + 300
Next ctl
Form.Height = Form.Height + 300

---

引用

不移动窗体上现有所有控件的位置

引用 8 楼 slowgrace 的回复:
可以这样做：

VB code'假设你希望你的窗体向上扩展300'    Form.Top= Form.Top-300ForEach ctl In Me.Controls