Foxtable(狐表)用户栏目专家坐堂 → 请狐大大帮忙一下


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

主题:请狐大大帮忙一下

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/10 8:46:00 [显示全部帖子]

按钮代码

if forms("另外一个窗口").opened then
Dim tab As WinForm.TabControl = forms("另外一个窗口").Controls("TabControl1")
tab.SelectedPage=tab.TabPages(e.sender.text)
end if
[此贴子已经被作者于2020/9/10 8:46:32编辑过]

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/10 15:55:00 [显示全部帖子]

页签没有设置名称(只是设置 标题),或者名称和按钮标题不是一样的,可以改为一样的名称

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/10 16:34:00 [显示全部帖子]

请上传实例说明

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/10 16:45:00 [显示全部帖子]

上传文件:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

一次不成功,重复多试几次。注意文件不能大于2M

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/17 9:05:00 [显示全部帖子]

这个是模式窗口,换种方法
主页的按钮
vars("n") = e.Sender.text
forms("综合管理").Open

综合管理窗口afterload事件加上:
If vars("n") > ""
    Dim tab As WinForm.TabControl = e.form.Controls("页面合集")
    tab.SelectedPage = tab.TabPages(vars("n"))
End If


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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/19 8:52:00 [显示全部帖子]


 回到顶部