主题：如何为TopicBar导航栏增加选中效果？

请教各位高手，

 

如何为TopicBar导航栏增加选中效果？例如，选择周计划，能将周计划高亮显示，或者红色字区分一下就好了

以前见一个高手在右边加了“→”，不知道怎么实现的？

 

 

此主题相关图片如下：snip20140423_6.png

 查了一下，不能设置背景颜色

 

For Each page As WinForm.TopicPage In e.Sender.Pages
    For Each link As Object In page.Links
       link.text = link.Text.Replace("->", "")
       link.Imagefile = Nothing
    Next
Next
e.Link.Text += "->"
e.Link.ImageFile = getImage("d:\xxx.ico")

在甜兄的代码上精简了一下，正是需要的效果。

 

For Each page As WinForm.TopicPage In e.Sender.Pages
    For Each link As Object In page.Links
       link.text = link.Text.Replace("★", "")
    Next
Next
e.Link.Text += "★"

 

好多新知识点：

 

1. e.Sender （在控件的事件代码中，如果要引用控件本身，也应该使用e参数：e.Sender，如果采用控件名称来引用，那么一旦需要修改控件名称，就必须同步修改代码）

 

2. .Replace（查找给定的子字符串，并用另一个子字符替换掉找到的子字符串。Replace(OldValue, NewValue)）

 

3. +=，这个用法怎么也搜不到？请问怎么理解啊

 第三点。str += "->"  是这样的简写  str = str & "->"

顶甜兄，多谢。 向甜兄学习，小狐狸继续潜水修炼去了