以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 控件控制 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57461) |
-- 作者:yifan3429 -- 发布时间:2014/9/25 10:51:00 -- 控件控制 If User.IsRole("编辑") Then Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer7") If sp.Panel2.Collapsed = False Then sp.Panel2.Collapsed = True Else sp.Panel2.Collapsed = False End If Else 什么也不做的代码是? End If
|
-- 作者:有点甜 -- 发布时间:2014/9/25 10:52:00 -- If User.IsRole("编辑") Then
Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer7")
If sp.Panel2.Collapsed = False Then
sp.Panel2.Collapsed = True
Else
sp.Panel2.Collapsed = False
End If
End If |
-- 作者:Bin -- 发布时间:2014/9/25 10:53:00 -- 什么都不做,就什么代码也不写. |