[求助]自动伸展分区面板 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有4418人关注过本帖树形打印复制链接主题：[求助]自动伸展分区面板

foskycn

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：92 积分：744 威望：0 精华：0 注册：2013/7/19 8:55:00

[求助]自动伸展分区面板 发帖心情

Post By：2013/9/16 10:06:00 [只看该作者]

怎么样才能让面板1在隐藏了B之后能自动延展呢？现在这个样子如果隐藏了B,那个位置空出一大块来了

下载信息 [文件大小：下载次数： ]
点击浏览该文件:隐藏分区面板.foxdb

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/9/16 10:11:00 [只看该作者]

这个没有办法,只能使用代码计算判断大小,然后设置宽度

Bin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/9/16 10:19:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:隐藏分区面板.foxdb

foskycn

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：92 积分：744 威望：0 精华：0 注册：2013/7/19 8:55:00

Post By：2013/9/16 10:25:00 [只看该作者]

谢谢BIN，这方法不错！

aalons

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：372 积分：2548 威望：0 精华：0 注册：2013/6/6 6:20:00

Post By：2013/9/16 11:52:00 [只看该作者]

开发版的啊看来学不了了。得买开发版了。

woshuovae

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：42 积分：485 威望：0 精华：0 注册：2013/5/22 23:50:00

Post By：2013/9/16 22:20:00 [只看该作者]

一个逻辑值吗，其实挺简单的啊，不是很复杂，有个collapsed的属性，按钮胡代码

e.Form.Controls("SplitContainer1").panel1.collapsed=not e.Form.Controls("SplitContainer1").panel1.collapsed
If e.Form.Controls("SplitContainer1").panel1.collapsed = False Then
e.Form.Controls("Button1").text = "隐藏前"
Else
e.Form.Controls("Button1").text = "隐藏后"
End If