Foxtable(狐表)用户栏目专家坐堂 → 如何遍历页面集合的所有页面


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

主题:如何遍历页面集合的所有页面

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


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
如何遍历页面集合的所有页面  发帖心情 Post By:2023/12/25 22:06:00 [只看该作者]

1、 这是不显示页面集合里某一个页面的代码:
          Dim tab As WinForm.TabControl = e.form.controls("页面集合")
          tab.TabPages("按钮页面").Visible = false

2、如果一个页面集合里有许多个页面,甚至以后还会添加页面,目前我只想显示其中一个已知的页面,名字是:A页面,如何遍历所有页面,让他们都不显示,遍历到A页面就显示

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/25 22:13:00 [只看该作者]

Dim tab As WinForm.TabControl = e.form.controls("页面集合")
For Each p As WinForm.TabPage In tab.TabPages
    p.Visible = False
Next 
tab.TabPages("A页面").Visible = true

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


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2023/12/25 22:14:00 [只看该作者]

谢谢,辛苦了!

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


加好友 发短信
等级:二尾狐 帖子:555 积分:5037 威望:0 精华:0 注册:2012/2/11 13:27:00
  发帖心情 Post By:2023/12/26 20:56:00 [只看该作者]

蓝版主,我原计划是在一个窗体中,插入了一个汇总表,在这个汇总表的click属性里,添加一个语句,
当点击其中一个列的汇总数值时,弹出一个窗体,就是开始提问提到的含有“页面集合”的窗体

因此需要用到你发给我的 一段代码,但这段代码是需要写在click属性里,
但系统提示语法不对 ,说form不是。。。。的成员,请问这段代码在click中应如何写?
(开始提问没说清楚,添麻烦了)

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/26 21:09:00 [只看该作者]

e.form
改为
forms("某某窗口")

 回到顶部