Foxtable(狐表)用户栏目专家坐堂 → 分区界面与窗口高度


  共有3093人关注过本帖平板打印复制链接

主题:分区界面与窗口高度

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


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
分区界面与窗口高度  发帖心情 Post By:2018/8/26 15:03:00 [只看该作者]

老师:
有二个分区界面SplitContainer1和SplitContainer2,点击按钮,关闭分区界面1的Panel2,并要求窗口高度与Panel1相同。


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


代码如下:

Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
If e.Sender.text = "∨∨∨∨" Then
    sp.Panel2.Collapsed = True
    e.sender.text = "∧∧∧∧"
Else
    sp.Panel2.Collapsed = False
    e.sender.text = "∨∨∨∨"
End If

 回到顶部
总数 12 1 2 下一页