Foxtable(狐表)用户栏目专家坐堂 → [建议] 完善精灵


  共有2580人关注过本帖树形打印复制链接

主题:[建议] 完善精灵

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


加好友 发短信
等级:童狐 帖子:263 积分:2443 威望:0 精华:0 注册:2008/10/19 11:36:00
  发帖心情 Post By:2021/11/5 7:57:00 [显示全部帖子]

这个功能我用属性值也可以实现:
Dim s As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim b As WinForm.Button = e.Form.Controls("Button1")
If b.Text="<" Then
s.Panel1.Collapsed =True
b.Text =">"
Else
s.Panel1.Collapsed =False
b.Text="<"
End If


 回到顶部