以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于导航栏的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14726)
--  作者：scl868
--  发布时间：2011/11/30 8:21:00
--  [求助]关于导航栏的问题

我很想知道开发板中《基本功能演示》中的导航栏是怎么作的，我为什么作不出来？


图片点击可在新窗口打开查看此主题相关图片如下：原导航.bmp
图片点击可在新窗口打开查看

很喜欢上面画红圈的方式，请告知如何才能实现和《基本功能演示》一样的导航，谢谢·

图片点击可在新窗口打开查看此主题相关图片如下：自己做的导航.bmp
图片点击可在新窗口打开查看

 
--  作者：狐狸爸爸
--  发布时间：2011/11/30 8:30:00
--  

窗口的AfterLoad事件：

 

Dim tpb As WinForm.TopicBar = e.Form.Controls("TopicBar1")
With Ctype(tpb.BaseControl, C1Command.C1TopicBar)
        .VisualStyle = C1Command.VisualStyle.WindowsXP
End With

 

 

 
--  作者：scl868
--  发布时间：2011/11/30 8:52:00
--  

OK 成功以。谢谢