主题：查找的字符串,能否用色块标出?

搜索备注列的内容,被搜索出来的字符串,希望能够用色块显示出来,就像FOXTABLE的帮助文件中的搜索那样,请问如何实现呢?

此主题相关图片如下：2.jpg

这个要用DrawCell事件，用一个public变量保存要查找的内容，然后再DrawCell事件中设置代码，标出此内容。

我有贴上来,前几天还有人问,找一下

此主题相关图片如下：3.jpg

我写的代码显然不对,其结果是单元格带颜色背景,而字符串依旧.

Dim dr AS Row=e.Row
If e.col.name="兼容电池" Then
  If e.Row.IsNull(e.Col.Name) = False  
    Static battery AS String          
    battery=dr("电池型号")        
    e.style="样式1"
    e.text=battery
   End If
End If

 

这个应该不需要用PUBLIC变量的吧.

要用到Graphics，我没做过，但想肯定可以的。。。。

对了，这个程版有经验，等他上来一定能帮你搞定····