以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  SplitContainer面板的显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89543)

--  作者:gryy
--  发布时间:2016/8/24 9:06:00
--  SplitContainer面板的显示
窗口表中双击显示隐藏的SplitContainer的panel2,没有显示是怎么回事呢
双击代码:
Dim s As WinForm.SplitContainer = forms("窗口1").Controls("SplitContainer2")
If s.Panel2.Collapsed = False Then  
    s.Panel2.Collapsed = True
End If

--  作者:Hyphen
--  发布时间:2016/8/24 9:26:00
--  
Dim s As WinForm.SplitContainer = forms("窗口1").Controls("SplitContainer1")
If s.Panel2.Collapsed = True Then  
    s.Panel2.Collapsed = False
End If