| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]Tabcontrol控件如何使第一页无法被关闭 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25172) |
| -- 作者：sunbrain -- 发布时间：2012/11/2 10:23:00 -- [求助]Tabcontrol控件如何使第一页无法被关闭 根据帮助，在tabcontrol控件的doubleclick，设置e.Sender.SelectedPage.Visible = False 可以实现关闭页面的作用，但是如何禁止关闭第一页呢？ 请大家帮助 |
| -- 作者：狐狸爸爸 -- 发布时间：2012/11/2 10:30:00 -- if e.Sender.SelectedIndex > 0 then e.Sender.SelectedPage.Visible = False end if |
| -- 作者：sunbrain -- 发布时间：2012/11/2 10:59:00 -- 谢谢您的回复，可是又有一个问题，我关闭了页签，怎么在用按钮打开呢？ 我在page1中一个按钮设置了 Forms("窗口1").Controls("TabControl1").Selectedpage = Forms("窗口1").Controls("TabControl1").TabPages("page2")
但是怎么都切换不了这个页面了
|
| -- 作者：狐狸爸爸 -- 发布时间：2012/11/2 11:02:00 -- Forms("窗口1").Controls("TabControl1").TabPages("page2").Visible = True Forms("窗口1").Controls("TabControl1").Selectedpage = Forms("窗口1").Controls("TabControl1").TabPages("page2") |
| -- 作者：sunbrain -- 发布时间：2012/11/2 11:07:00 -- 谢谢，我就是按照这样弄出来的，因为第一次关闭了之后，其他的不可见，现在需要写代码可见，已经搞定 |
| -- 作者：sunbrain -- 发布时间：2012/11/2 11:08:00 -- \'e.Form.Controls("TabControl1").SelectedIndex = 1 \'e.form.Controls("TabControl1").TabPages(1).visible = True 我这样弄的 |
| -- 作者：sunbrain -- 发布时间：2012/11/2 11:18:00 -- 真是不好意思，问题总是没完没了。。。。。 我想进入窗口的时候，除了第一个页面不隐藏之外，其他的都隐藏。需要的时候再打开，不需要的时候关闭。 我这样设置了（窗口的AFTERLOAD） For Each pg As WinForm.TabPage In Forms("窗口1").Controls("TabControl1").TabPages
结果总是报错，麻烦狐爸再帮我一把，谢谢 [此贴子已经被作者于2012-11-2 11:18:52编辑过]
|
| -- 作者：sunbrain -- 发布时间：2012/11/2 11:31:00 -- 已经搞定了 但为什么不能向上面的那样呢 Dim p1 As WinForm.TabPage
|
| -- 作者：lin_hailun -- 发布时间：2012/11/2 11:36:00 -- 不知道报什么错，不好解释，代码看着没什么错吧。 |