以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助,如何用命令设置分隔条的值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43373)

--  作者:yd0731
--  发布时间:2013/12/5 15:15:00
--  求助,如何用命令设置分隔条的值
求助,如何用命令设置分隔条的值
图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2013/12/5 15:22:00
--  
不要设置固定分区即可.
--  作者:teng0731
--  发布时间:2013/12/5 15:33:00
--  
如果要使用命令设置呢?
[此贴子已经被作者于2013-12-5 15:35:06编辑过]

--  作者:Bin
--  发布时间:2013/12/5 15:40:00
--  
FixedPanel=0


e.form.controls("XX").FixedPanel=0

--  作者:yd0731
--  发布时间:2013/12/5 15:52:00
--  

感谢bin,

 

自己找到了另外一种方法,先把固定分区取消掉,然后用:

Dim a1 As  Single = e.Form.Controls("SplitContainer1").Height
e.Form.Controls("SplitContainer1").SplitterDistance = a1/2

 

通过上面的命令可以达到上下分区高度各分50%的效果。

[此贴子已经被作者于2013-12-5 15:54:46编辑过]