| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 返回页面的代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=6748) |
| -- 作者：blackzhu -- 发布时间：2010/4/22 17:19:00 -- 返回页面的代码 Dim pg As WinForm.TabPage pg = Forms("控制窗口").Controls("TabControl1").TabPages(1) pg.Visible = False 我利用上面的代码关闭页面,但是我想关闭后自动回到第一个页面,也就是(0)页面,代码怎么写? |
| -- 作者：blackzhu -- 发布时间：2010/4/22 17:33:00 -- 我要回到第一个页面的界面上. |
| -- 作者：blackzhu -- 发布时间：2010/4/22 17:51:00 -- 也就是焦点在界面上,现在我关闭了第二个页面,第一个页面必须要点一下才能回到第一个页面的界面,我想自动返回去. |
| -- 作者：czy -- 发布时间：2010/4/22 18:30:00 -- 这样吗？ Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0 |
| -- 作者：blackzhu -- 发布时间：2010/4/23 7:14:00 -- 以下是引用czy在2010-4-22 18:30:00的发言：
这样吗？ Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0 老大这个代码不行,我试过了.返回不到界面.必须要点击后才会回去,估计没有办法可以做到的,我做到回到这个界面的控件上,但也返回不到这个界面. |
| -- 作者：blackzhu -- 发布时间：2010/4/23 13:16:00 -- 以下是引用czy在2010-4-22 18:30:00的发言：
这样吗？ Forms("控制窗口").Controls("TabControl1").SelectedIndex = 0 老大,你的代码可以的,我想复杂了. |