以文本方式查看主题

-  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=48704)
--  作者：jspta
--  发布时间：2014/4/3 14:30:00
--  [分享]TabControl控件风格设置

大家对于foxtable的界面风格设置肯定有种恨铁不成钢的感觉，要设置吧，没地方设置。说它丑吧，它还真丑特别是TabControl的设置，那真的是苦不堪言。
今天无意中发现一个一直没人解决的问题，特拿出来分享给大家。
Dim tabct as winform.TabControl
Dim sstabct As C1.Win.C1Command.C1DockingTab = tabct.BaseControl
With sstabct
.BorderStyle = System.Windows.Forms.BorderStyle.None
\'.TabStyle = C1.Win.C1Command.TabStyleEnum.Office2007  \'以下两句没太多区别，选一个就可以了，有高手可以出来说下
.VisualStyle = C1.Win.C1Command.VisualStyle.Office2007Blue
End With

For Each tabpg As WinForm.TabPage In tabct.TabPages
Tabpg.TabBackColor = Color.LightSkyBlue \'设置标签颜色
Tabpg.TabBackColorSelected = Color.LightSkyBlue \'设置选择标签颜色
next
设置完成后是不是漂亮很多呐？但是~~~~~你随便点下标签旁边空白处或切换标签，就发现怎么又变回去了。
坑死了有没有？难道真的要靠动态生成了吗？那元凶又是什么那？？

以下内容只有回复后才可以浏览
[此贴子已经被作者于2014-4-3 14:32:30编辑过]
--  作者：tennis
--  发布时间：2014/4/3 14:33:00
--  

3Q
--  作者：Bin
--  发布时间：2014/4/3 14:33:00
--  
图片点击可在新窗口打开查看
--  作者：lsy
--  发布时间：2014/4/3 14:41:00
--  
好，看看。
--  作者：y2287958
--  发布时间：2014/4/3 14:42:00
--  
要看看
--  作者：黄训良
--  发布时间：2014/4/3 14:46:00
--  
真的要看看！
--  作者：jnletao
--  发布时间：2014/4/3 14:48:00
--  
膜拜
--  作者：don
--  发布时间：2014/4/3 14:52:00
--  
回覆!
--  作者：hanxuntx
--  发布时间：2014/4/3 15:05:00
--  
谢谢分享
--  作者：bahamute
--  发布时间：2014/4/3 15:10:00
--  
谢谢分享