以文本方式查看主题

-  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=37877)
--  作者：worldespier
--  发布时间：2013/7/13 22:59:00
--  一个关于TabControl的问题
请问， 我想让TabControl控件的第2页、第3页不可用，该怎样写代码？
--  作者：e-png
--  发布时间：2013/7/13 23:11:00
--  

SeletedIndexChanged：

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
If tab.SelectedIndex = 1 Or tab.SelectedIndex = 2

     tab.SelectedIndex = 0
End If
--  作者：worldespier
--  发布时间：2013/7/13 23:40:00
--  
谢谢，这样可以实现，但是似乎带来了一个问题，这些代码是写在 SelectedIndexchanged事件中的，所以永远不能选择第2页和第3页了。
--  作者：lsy
--  发布时间：2013/7/14 10:13:00
--  
以下是引用worldespier在2013-7-13 23:40:00的发言：
谢谢，这样可以实现，但是似乎带来了一个问题，这些代码是写在 SelectedIndexchanged事件中的，所以永远不能选择第2页和第3页了。

你想什么情况下可用，什么情况下不可用，这样做个判断就行了。
--  作者：狐狸爸爸
--  发布时间：2013/7/15 8:53:00
--  
Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
tab.TabPages(1).enabled = False