以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  隐藏侧边按钮  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65512)

--  作者:blsu33
--  发布时间:2015/3/17 16:14:00
--  隐藏侧边按钮
老师,
   一个隐藏侧边的按钮,如何使用命令使窗口大小也跟着变化呢。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:隐藏侧边.rar



--  作者:Bin
--  发布时间:2015/3/17 16:18:00
--  
你给的例子就会啊
--  作者:有点甜
--  发布时间:2015/3/17 16:19:00
--  

 比如,控制窗口的宽度

 

e.Form.panel.parent.parent.width = 50


--  作者:blsu33
--  发布时间:2015/3/17 17:11:00
--  
求老师帮忙改改,

主要是 模式窗口跟着变化
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:隐藏侧边.rar


[此贴子已经被作者于2015/3/17 17:11:56编辑过]

--  作者:有点甜
--  发布时间:2015/3/17 17:15:00
--  
Dim ck As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
If ck.Panel2.Collapsed=True Then
    ck.Panel2.Collapsed=False
    Forms("侧边按钮").BaseForm.width = 250
    Forms("侧边按钮").BaseForm.height=500
Else
    ck.Panel2.Collapsed=True
    Forms("侧边按钮").BaseForm.width = 500
    Forms("侧边按钮").BaseForm.height=500
End If

--  作者:blsu33
--  发布时间:2015/3/17 17:30:00
--  
老师,
这段代码啥意思呀

e.Form窗口
.panel  窗口中的控件吗
.parent 是控件上的什么
.parent 是控件的控件吗
.width = 50  宽度 50

--  作者:有点甜
--  发布时间:2015/3/17 17:34:00
--  

当一个窗口是停靠窗口的时候,它就被放在一个容器里面去了 

 

e.Form 窗口
.panel  窗口中的控件
.parent 控件panel的父容器
.parent 父容器
.width = 50  宽度 50

--  作者:blsu33
--  发布时间:2015/3/17 18:00:00
--  
有点甜老师,
        
此主题相关图片如下:控件.jpg
按此在新窗口浏览图片

.panel  窗口中的控件-是BUTTON
.parent 控件panel的父容器   这个肯定是.Form 窗口
.parent 父容器      这个是您说的(它就被放在一个容器里面去了


--  作者:有点甜
--  发布时间:2015/3/17 19:20:00
--  

不要纠结这些,知道怎么用就行了。