Foxtable(狐表) → 用户栏目 → 专家坐堂 → 返回页面的代码


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

主题：返回页面的代码
帅哥哟，离线，有人找我吗？
blackzhu
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9875 积分：57596 威望：0 精华：15 注册：2008/9/1 9:45:00 		返回页面的代码  发帖心情 Post By：2010/4/22 17:19:00 [只看该作者]

Dim pg As WinForm.TabPage
pg = Forms("控制窗口").Controls("TabControl1").TabPages(1)
pg.Visible = False

我利用上面的代码关闭页面,但是我想关闭后自动回到第一个页面,也就是(0)页面,代码怎么写?

 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9875 积分：57596 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2010/4/22 17:33:00 [只看该作者]

我要回到第一个页面的界面上.

 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9875 积分：57596 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2010/4/22 17:51:00 [只看该作者]

也就是焦点在界面上,现在我关闭了第二个页面,第一个页面必须要点一下才能回到第一个页面的界面,我想自动返回去.
 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2010/4/22 18:30:00 [只看该作者]

这样吗？

Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0

 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9875 积分：57596 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2010/4/23 7:14:00 [只看该作者]

以下是引用czy在2010-4-22 18:30:00的发言：
这样吗？

Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0

老大这个代码不行,我试过了.返回不到界面.必须要点击后才会回去,估计没有办法可以做到的,我做到回到这个界面的控件上,但也返回不到这个界面.
 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9875 积分：57596 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2010/4/23 13:16:00 [只看该作者]

以下是引用czy在2010-4-22 18:30:00的发言：
这样吗？

Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0

老大,你的代码可以的,我想复杂了.
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03418 秒, 4 次数据查询