以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]SplitContainer设置隐藏panel2，显示无效果  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78230)
--  作者：13865161910
--  发布时间：2015/12/4 16:15:00
--  [求助]SplitContainer设置隐藏panel2，显示无效果

SplitContainer控件，fill属性铺满窗口，

afterload代码如下设置，对panel2隐藏，并将窗口缩放只显示panel1

Forms("Email").Controls("SplitContainer1").Panel2.Collapsed = False
e.Form.BaseForm.Width = 469
e.Form.BaseForm.Height = 442

 

然后设置两个切换显示按钮，

按钮A显示

Forms("Email").Controls("SplitContainer1").Panel2.Collapsed = True ‘隐藏panel2
e.Form.BaseForm.Width = 758 \'设置窗口宽度

e.Form.BaseForm.Height = 442 ’设置窗口高度

按钮B隐藏

Forms("Email").Controls("SplitContainer1").Panel2.Collapsed = False
e.Form.BaseForm.Width = 469
e.Form.BaseForm.Height = 442

 

测试开始还能正常显示，现在点击按钮，只有窗口大小能正常改变，但是Panel2的面板却无法正常显示出来了，重新打开项目，删除bin文件夹问题依旧，请问这是什么原因？哪里有问题？

 

 

 

 
--  作者：大红袍
--  发布时间：2015/12/4 16:20:00
--  

1、做例子上来

 

2、直接控制 SplitterDistance 可以设置分区大小