Foxtable(狐表)用户栏目专家坐堂 → 隐藏其他页面


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

主题:隐藏其他页面

帅哥哟,离线,有人找我吗?
花开的声音
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1172 积分:8418 威望:0 精华:0 注册:2012/10/29 20:09:00
隐藏其他页面  发帖心情 Post By:2019/1/3 21:41:00 [只看该作者]

Dim tb1 As WinForm.TabControl = e.Form.Controls("机构变更登记")

' 隐藏除包含有名称之外的页面
For Each pg As  WinForm.TabPage  In tb1.TabPages
    If pg.Name.Contains("名称")=False Then
        pg.Visible=False
    End If
Next

错误?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/3 21:47:00 [只看该作者]

代码没问题。请弹出pg.name看一下值是否正确

 回到顶部