Foxtable(狐表)用户栏目专家坐堂 → 页签问题


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

主题:页签问题

帅哥哟,离线,有人找我吗?
巷弄太过弯曲
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
页签问题  发帖心情 Post By:2019/3/22 13:02:00 [只看该作者]

老师,帮我看一下这个代码该怎么写,如图 当我双击名为“WIFI信息查询”页签 “WIFI信息查询”页签则隐藏, 当我双击“page3”页签也要隐藏 其他显示的页签不隐藏 这个该怎么写
图片点击可在新窗口打开查看此主题相关图片如下:16.png
图片点击可在新窗口打开查看

DoubleClick:


Dim pg As WinForm.TabPage



 pg = Forms("主窗体").Controls("页签").TabPages("WIFI信息查询") 

pg.Visible = False '双击关闭当前页面


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


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

msgbox(e.sender.selectedPage.text)

If e.sender.selectedpage.text = "WIFI信息查询" Then

    e.sender.selectedpage.visible = false

ElseIf e.sender.selectedpage.text = "Page3" Then

    e.sender.selectedpage.visible = false

End If


 回到顶部
帅哥哟,离线,有人找我吗?
巷弄太过弯曲
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
  发帖心情 Post By:2019/3/22 16:28:00 [只看该作者]

谢谢老师

 回到顶部