- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 分区面板显示与隐藏 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122815)
-- 发布时间：2018/8/2 15:49:00
-- 分区面板显示与隐藏
我的需求：
点击右边按钮时，隐藏sp1上面这个界面，代码如何处理？谢谢
-- 发布时间：2018/8/2 16:21:00
--
Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim sp3 As WinForm.SplitContainer = e.Form.Controls("SplitContainer3")
static pheight As Integer
If e.Sender.text = "∧∧∧∧" Then
pheight = sp.SplitterDistance
sp.SplitterDistance = sp3.height+sp.SplitterWidth*2-5
e.sender.text = "∨∨∨∨"
Else
sp.SplitterDistance = pheight
e.sender.text = "∧∧∧∧"
End If
-- 发布时间：2018/8/2 17:07:00
--
老师不对的，多点击几次，按钮逐渐变小了，如何处理？
-- 发布时间：2018/8/2 18:07:00
--
以下是引用ZJZK2018在2018/8/2 17:07:00的发言：
老师不对的，多点击几次，按钮逐渐变小了，如何处理？
老师不对的，多点击几次，按钮逐渐变小了，如何处理？
设置这个地方，改成具体的数值。
sp.SplitterDistance = 50