以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  页面集合  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=25004)

--  作者:gzyt
--  发布时间:2012/10/29 11:42:00
--  页面集合
请教老师,在以前狐爸举的一个例子:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1(3).table

在按按钮1后,页面1是灰色的,需要再按一下页面1才能显示内容,再接着按其他按钮后,再回到页面1,又成灰色的了,怎样才能避免,请指教,谢谢!
--  作者:狐狸爸爸
--  发布时间:2012/10/29 12:56:00
--  

第一个按钮的代码改为:

 

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
For i As Integer = 0 To 4
  tab.TabPages(i).visible = (i = 0)
Next
tab.SelectedIndex = 0


--  作者:gzyt
--  发布时间:2012/10/29 13:09:00
--  
非常感谢