如果只是要藏起来就很简单
dim c as control
for each c in me.controls
if typeof c is mdiclient then
c.dock = none
c.location = new point(-2,-2) '把3d border 藏起来不然很怪
c.height += 10
c.width += 10
'如果有其它东西如menustrip或statusstrip就要改变
end if
next作者: TSHsoft 时间: 2009-11-8 10:33 AM
正常是mdiclient移动超过mdiparent范围的时候,mdiparent就自动会有scrollbar出现,所以你不要让scrollbar出现也不要让mdiclient超过mdiparent的范围咯~ 是吗?