以文本方式查看主题

-  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