Foxtable(狐表)用户栏目专家坐堂 → [求助]分区面板


  共有2020人关注过本帖树形打印复制链接

主题:[求助]分区面板

帅哥哟,离线,有人找我吗?
江南小城
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1005 积分:5955 威望:0 精华:0 注册:2015/6/18 5:15:00
[求助]分区面板  发帖心情 Post By:2016/3/1 10:05:00 [只看该作者]

老师好,隐藏分区面板2分区面板1保持不变。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/1 10:41:00 [只看该作者]

设置属性

 

控件.SplitterDistance = 500


 回到顶部
帅哥哟,离线,有人找我吗?
江南小城
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1005 积分:5955 威望:0 精华:0 注册:2015/6/18 5:15:00
  发帖心情 Post By:2016/3/1 20:04:00 [只看该作者]

老师,我Forms("系统").Controls("SplitContainer1").SplitterDistance = 250设置后没有,2分区隐藏后1分区还是被拉出去了。


 回到顶部
帅哥哟,离线,有人找我吗?
wgmcom
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:223 积分:1386 威望:0 精华:0 注册:2015/12/26 16:57:00
  发帖心情 Post By:2016/3/1 20:05:00 [只看该作者]

e.Form.Controls("SplitContainer1").Panel2Collapsed = True

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/1 22:21:00 [只看该作者]

 没看懂你的意思,上传具体说明问题。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小城
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1005 积分:5955 威望:0 精华:0 注册:2015/6/18 5:15:00
  发帖心情 Post By:2016/3/2 8:36:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:图像 1.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/2 9:36:00 [只看该作者]

直接改下整个控件的宽度

Dim SplitContainer1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
SplitContainer1.Width = SplitContainer1.Panel1.Width

显示改回原值
Dim SplitContainer1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
SplitContainer1.Width = 400

 回到顶部